Discussion :

[Tartenpion]

Bonjour,

J'ai une liste deroulante dans une form excel qui recupere les valeurs de 2 colonnes d'une feuille.:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Private Sub cbxProj_DropButtonClick()
 
  With Sheets("Data").Range("A1")
 
    Me.cbxProj.RowSource = "Data!A1:B" & Sheets("Data").Cells(1, 1).End(xlDown).Row
 
  End With
 
End Sub

Certains boutons de ma form(donc evenement) dependent de la selection dans cette liste. Cela fonctionne correctement mais le pb c'est que lorsque je ne selectionne rien et donc que la selection reste vide, j'ai une erreur lorsqu'un evenement base sur cette selection est lance.

J'ai essaye la chose suivante mais ca ne marche pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If cbxProj.List(cbxProj.ListIndex) Is Null Then
 
    MsgBox ("Select a project first!")
 
End If

Une idee?

[AlainTech]

A mon avis, ceci devrait marcher:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If cbxProj.Listindex = -1 Then 
 
    MsgBox ("Select a project first!") 
 
End If

[Tartenpion]

Effectivement ca marche, Merci bien!

[ouskel'n'or]

Pour ton info, inutile d'écrire Résolu dans le sujet, tu as un bouton en bas et à gauche de la fenêtre qui fait ça pour toi

A+