Recuperer la valeur d une inputbox avec condition [Résolu]

Messages postés
453
Date d'inscription
dimanche 20 août 2006
Dernière intervention
11 janvier 2013
- - Dernière réponse : scromania
Messages postés
453
Date d'inscription
dimanche 20 août 2006
Dernière intervention
11 janvier 2013
- 16 déc. 2010 à 15:17
bonjour

le code suivant genere une erreur dans elseif:

auriez vous une idée merci
If InputBox("Mot de passe", "Sécurite_Environnement") = "Safety2010" Then
Sheets("Feuil1").Visible = True
Sheets("Feuil2").Visible = True
Sheets("Feuil3").Visible = True
Sheets("Feuil6").Visible = True
Sheets("Feuil7").Visible = True
Sheets("Visite reçu Aout").Visible = True
Sheets("Visites reçu Juin").Visible = True
Sheets("Feuil5").Select
ElseIf InputBox("", "") <> "Safety2010" Then
MsgBox("Veuillez le renouvelé", vbOKOnly, "Mot de passe incorrecte") = vbOK
Else
Sheets("Feuil5").Select
End If
Afficher la suite 

Votre réponse

1 réponse

Meilleure réponse
Messages postés
453
Date d'inscription
dimanche 20 août 2006
Dernière intervention
11 janvier 2013
7
3
Merci
en faite j'ai mélangé vb net vba

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 117 internautes nous ont dit merci ce mois-ci

Commenter la réponse de scromania

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.