Remplir Combobox excel VBA

Résolu/Fermé

Moujik1 - 4 août 2011 à 10:02
Moujik1 - 4 août 2011 à 11:15

Bonjour,

Je cherche à remplir un combobox en fonction des valeurs sélectionnées dans un premier combobox rempli précédemment dans mon userform.

Mon code placé dans userform1 (code) est le suivant :

Private Sub ComboBox2_Change()

If ComboBox2.Value = c1 Then
ThisWorkbook.Sheets("Feuil2").Select
ComboBox3.RowSource = d1: d5
End If

If ComboBox2.Value = c2 Then
ThisWorkbook.Sheets("Feuil2").Select
ComboBox3.RowSource = d6: d9
End If

If ComboBox2.Value = c2 Then
ThisWorkbook.Sheets("Feuil2").Select
ComboBox3.RowSource = d10: d15
End If
End Sub

Le message d'erreur qui s'affiche est "erreur de compilation sub ou fonction non définie".
Je suis complètement coincé et j'ai besoin d'aide car je ne trouve rien correspondant à mon problème sur les forums.

Merci d'avance

A voir également:

Remplir Combobox excel VBA
Liste déroulante excel - Guide
Formule excel - Guide
Si et excel - Guide
Aller à la ligne excel - Guide
Remplir et signer pdf - Guide

1 réponse

Réponse 1 / 1

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
Modifié par gbinforme le 4/08/2011 à 10:27

bonjour

Avec des guillemets cela serait sans doute mieux accepté sinon il faut nommer :

If ComboBox2.Value = "c1" Then 
ThisWorkbook.Sheets("Feuil2").Select
ComboBox3.RowSource = "d1:d5"

Toujours zen

Moujik1
4 août 2011 à 10:29

non les guillemets ne changent rien il semble que le problème commence dès la ligne :

private sub combobox2_change()

Merci quand même

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
4 août 2011 à 10:44

non les guillemets ne changent rien

Cela serait nouveau sauf si tu t'es permis de modifier le code excel...

Avec les guillemets cela fonctionne sur mon excel standard ;-)

Moujik1
4 août 2011 à 11:10

Mille excuses tu as raison il n'y a plus de message d'erreur en revanche mon combobox3 ne se rempli pas

Merci de tes conseils

Moujik1
4 août 2011 à 11:15

en fait ça marche merci beaucoup gbinforme tu es un as

Discussions similaires

ouverture d'un fichier excel à partir d'un code VBA

Remplir une cellule (texte) en fonction d'une autre (texte).

Discussions similaires

Newsletters