Listbox et message d'erreur

lironik · 13 Janvier 2009

Bonjour le forum
J'ai ma listebox à deux colonnes et j'aimerais mettre en place un msgbox qui se déclencherait quand aucun élément dans la liste box n'est sélectionné. Et dans le cas où un élément est sélectionné alors la macro continue de manière habituelle en exportant les données sélectionné vers la feuille excel.

J'ai entré le code suivant

Code:

If ListBox1.Selected(i) = False Then MsgBox ("Aucune donnée saisie")

Merci de votre aide

PascalXLD · 13 Janvier 2009

Re : Listbox et message d'erreur

Bonjour

essaies

If ListBox1.listindex = -1 Then MsgBox ("Aucune donnée saisie")

lironik · 13 Janvier 2009

Re : Listbox et message d'erreur

Il y a un bug "Erreur de compilation _ Attendu: fin d'instructions"

PascalXLD · 13 Janvier 2009

Re : Listbox et message d'erreur

Re

Oups bizarre

Tu peux joindre ton fichier STP

lironik · 13 Janvier 2009

Re : Listbox et message d'erreur

Désolé mais l'erreur est dû à une faute de frappe de ma part: j'ai écrit elese if au lieu de else if
Après correction le code marche donc merci

PascalXLD · 13 Janvier 2009

Re : Listbox et message d'erreur

RE

tu as ecris EleseIf au lieu de ElseIf

Listbox et message d'erreur

lironik

XLDnaute Nouveau

PascalXLD

XLDnaute Barbatruc

lironik

XLDnaute Nouveau

PascalXLD

XLDnaute Barbatruc

lironik

XLDnaute Nouveau

PascalXLD

XLDnaute Barbatruc

Discussions similaires