liste de choix et VBA

Hulk

XLDnaute Barbatruc

• 12 Mars 2009

• #2

Re : liste de choix et VBA

Hello,

Heu je ne veux pa être asdfsdfeksjhhgidvusdfgkwsk, mais si tu mets des mots de passes dans ton fichier, on va avoir de la peine à t'aider..

Dépose le même fichier sans données confidentielles et sans mot de passe !

Cdt, Hulk.

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 12 Mars 2009

• #3

Re : liste de choix et VBA

Bonjour Hulk, F1F00 🙂,
Euh, Hulk, tu me donnera la traduction de "asdfsdfeksjhhgidvusdfgkwsk" 😀?
Non seulement les feuilles sont protégées par mot de passe, mais... il n'y a pas de listes déroulantes (ou elles sont bloquées en même temps que la feuille), et plus fort, nulle part dans la macro il n'est fait référence à une cellule concernant ces listes déroulantes...😱
Si par hasard, un jour, il y a une référence à une liste (en B6 sur iZiCompta par exemple), il te suffira de mettre

Code:

If Sheets("iZiCompta").Range("B6") = "" Then
MsgBox("Il faut saisir un mois, screugneugneu...!")
Exit Sub
End If

Bon courage 😎

 

Vote positif 0 Vote négatif

F

f1f00

XLDnaute Occasionnel

• 12 Mars 2009

• #4

Re : liste de choix et VBA

Pardon lol je n'avais pas fait attention

Regarde la pièce jointe iZiCompta(1).xls

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 12 Mars 2009

• #5

Re : liste de choix et VBA

Re,

Bon ben si bien saisis, je te propose ceci qui va dans le sens de JNP...

Cdt, Hulk.



P. S. Jnp, "asdfsdfeksjhhgidvusdfgkwsk" veut dire "ch..nt" !... 😀 et "screugneugneu" ?? 😀

 

Pièces jointes

• iZiCompta(1).zip

  19.1 KB · Affichages: 30

Vote positif 0 Vote négatif

F

f1f00

XLDnaute Occasionnel

• 12 Mars 2009

• #6

Re : liste de choix et VBA

JNP j'ai essayé ta formule mais je ne sais pas bien ou la palcer si bien quequand je la mais la macro plante lorsque l'utilisateur choisi queque chose donc c'est pas génial.

 

Vote positif 0 Vote négatif

F

f1f00

XLDnaute Occasionnel

• 12 Mars 2009

• #7

Re : liste de choix et VBA

Merci Hulk pour ton aide c'est exactement ca que je rechercher masi petit problème, après que la fenetre "Vous devez choisir un mois" apparait la macro bug quand même. Moi je voudrais qu'apres le message rien ne se passe alors que la les feuilles s'ouvrent quand même et la macro plante. A tu une idée?

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 12 Mars 2009

• #8

Re : liste de choix et VBA

Re,

Peut-être avec le On Error Resume Next

Code:

Private Sub CommandButton1_Click()
On Error Resume Next
If [B6] = "" Then MsgBox "Vous devez choisir un mois !"
bouton = 1
charge
End Sub

Idem pour les autres, tu rajoutes le On Error Resume Next en début de procédure.

Cdt, Hulk.

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 12 Mars 2009

• #9

Re : liste de choix et VBA

Re,

Au fait non, bien mieux comme ça, toujours comme le proposait l'ami Jnp !

Code:

Private Sub CommandButton1_Click()
On Error Resume Next
If [B6] = "" Then
MsgBox "Vous devez choisir un mois !"
Exit Sub
End If
bouton = 1
charge
End Sub

Private Sub CommandButton2_Click()
On Error Resume Next
If [C6] = "" Then
MsgBox "Vous devez choisir un mois !"
Exit Sub
End If
bouton = 2
charge
End Sub

Private Sub CommandButton3_Click()
On Error Resume Next
If [D6] = "" Then
MsgBox "Vous devez choisir un mois !"
Exit Sub
End If
bouton = 3
charge
End Sub

Private Sub CommandButton4_Click()
On Error Resume Next
If [E6] = "" Then
MsgBox "Vous devez choisir un mois !"
Exit Sub
End If
bouton = 4
charge
End Sub

Nettement mieux !

Cdt, Hulk.

 

Dernière édition: 12 Mars 2009

Vote positif 0 Vote négatif

F

f1f00

XLDnaute Occasionnel

• 12 Mars 2009

• #10

Re : liste de choix et VBA

Perfecto!!!
Merci beaucoup pour ton aide

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 12 Mars 2009

• #11

Re : liste de choix et VBA

Re 🙂,
Désolé, j'étais un peu parti, mais à priori c'est bon 😛.
Hulk : Screugneugneu, c'est comme m'enfin, c'est dans LaGaffe...
Bonne journée 😎

 

Vote positif 0 Vote négatif