Z
zorg
Guest
bonjour le forum,
j'aimerais faire un controle dans une macro pour une inputbox; si l'utilisateur clique sur annuler on sort de la macro; si la valeur saisie correspond bien à l'un des noms de feuilles présentes dans le classeur on continue sinon si erroné on sort de la macro.
Etant novice dans le vba je n'arrive pas écrire un code correct
merci d'avance à ceux qui me donneront un coup de main
J'ai commencé de la maniere suivante :
Dim Message, Title, Default, MyValue
Message = "Veuillez saisir le nom de la feuille N° 2" & Chr(13) & _
"Ex: Calcul Impot JUILLET_04" & Chr(13) & _
"!!! SOYEZ VIGILANT A LA SYNTAXE !!!"
Title = "Question utilisateur"
Default = "Calcul Impot"
MyValue = InputBox(Message, Title, Default)
If IsEmpty(MyValue) Goto Fin
Else if
' là je ne sais pas comment controler l'exactitude de la valeur saisie
'on continue l'éxécution
Else goto Fin
End if
Fin:
End sub
j'aimerais faire un controle dans une macro pour une inputbox; si l'utilisateur clique sur annuler on sort de la macro; si la valeur saisie correspond bien à l'un des noms de feuilles présentes dans le classeur on continue sinon si erroné on sort de la macro.
Etant novice dans le vba je n'arrive pas écrire un code correct
merci d'avance à ceux qui me donneront un coup de main
J'ai commencé de la maniere suivante :
Dim Message, Title, Default, MyValue
Message = "Veuillez saisir le nom de la feuille N° 2" & Chr(13) & _
"Ex: Calcul Impot JUILLET_04" & Chr(13) & _
"!!! SOYEZ VIGILANT A LA SYNTAXE !!!"
Title = "Question utilisateur"
Default = "Calcul Impot"
MyValue = InputBox(Message, Title, Default)
If IsEmpty(MyValue) Goto Fin
Else if
' là je ne sais pas comment controler l'exactitude de la valeur saisie
'on continue l'éxécution
Else goto Fin
End if
Fin:
End sub