Bonjour,
Je travail actuellement sur un modè excel que je programme sous Microsoft Visual Basic pour Excel 2003.
Je crée une ListBox, appelée fmListBox, dans les Feuilles de mon fichier avec le code suivant.
Je travail actuellement sur un modè excel que je programme sous Microsoft Visual Basic pour Excel 2003.
Je crée une ListBox, appelée fmListBox, dans les Feuilles de mon fichier avec le code suivant.
Code
Option Explicit
Private Sub Label1_Click()
End Sub
Private Sub lbOrientation_Click()
End Sub
Private Sub UserForm_Initialize()
lbOrientation.AddItem "Arc de cercle à Droite"
lbOrientation.AddItem "Arc de cercle à Gauche"
End Sub
[\quote]
Puis j'appelle ma fenêtre à s'ouvrir, dans une procédure d'un module du fichier, pour demander à la personne qui l'utilise
quel type de profil elle utilise avec la commande:
fmListBox.Show
[\quote]
Puis je veux récupérer la valeur qui a été sélectionner. Pour cela j'ai écrit à la suite dans la procédure le code suivant
:
Code
Dim Orientation As String
For i = 1 To fmListBox.ListCount
If fmListBox.Selected(1) = True Then
Orientation = fmListBox.List(1)
Else
Orientation = fmListBox.List(2)
End If
Next i
[\quote]
Le problème est qu'il me sort une erreure de compilation en me surlignant ListCount et en me disant Membre de méthode ou
de données introuvable.
Quelqu'un saurait-il comment je epux faire pour récupérer la valeur qui est sélectionnée dans ma fmListBox, dnas ma
procédure pour utiliser son résultat par la suite.
Merci d'avance de vos réponses.