OVH Cloud OVH Cloud

CTRLer l'affichage d'une UsF à l'initialisation

11 réponses
Avatar
PAN GOT
Bonjour,
Ma question peut paraître bizarre mais je voudrait afficher ou non une
UserForm en fonction d'un contrôle que j'effectue lors de son
initialisation. Si une condition n'est pas remplis, je sors et je n'affiche
rien.
Quelqu'un aurait une idée sur ça?
Merci d'avance.
Patrick

1 réponse

1 2
Avatar
PAN GOT
Effectivement la fonction End arrete le code mais dans ce cas de figure, ça
me va pile poil.
J'avais aussi essayé la fonction me.hide sans resultat
La fonction Userform1.Show 0 m'a renvoyé une erreur de compilation que je
sois dans une version avec la multipage ou sans.
Merci à tous les trois
PAN

"papou" a écrit dans le message
de news: %
Bonjour Isabelle ;-)
Il est peut-être utile de signaler que l'instruction "End" arrêtera toute
l'exécution du code ?
Donc si notre utilisateur veut afficher, un message d'alerte par exemple,
il faudra qu'il le positionne avant l'instruction End.
Private Sub UserForm_Initialize()
If MonControle = True Then
Msgbox "J'arrête de bosser !"
End
End If
End Sub

Cordialement
Pascal

"isabelle" a écrit dans le message de news:
%
bonjour Pan,

par exemple :

Private Sub UserForm_Initialize()
If Sheets("Feuil1").Range("A1") = 1 Then End
End Sub

isabelle

PAN GOT a écrit :
Bonjour,
Ma question peut paraître bizarre mais je voudrait afficher ou non une
UserForm en fonction d'un contrôle que j'effectue lors de son
initialisation. Si une condition n'est pas remplis, je sors et je
n'affiche rien.
Quelqu'un aurait une idée sur ça?
Merci d'avance.
Patrick










1 2