Posez votre question Signaler

Execution macro à l'ouverture d'une userform [Résolu]

Gaby - Dernière réponse le 22 avril 2013 à 15:04
Bonjour,
Je souhaite exécuter une macro lors de l'ouverture d'une userform.
J'ai dans une macro, la ligne suivante : Userform1.show
J'ai d'autre ligne de code à la suite, mais l'ouverture de la userform bloque leur execution. Pour que la suite du code de ma macro s'execute, il faut que je ferme la userform, ce que je ne veux pas.
Comme solution je me dit qu'il faudrais que j'execute la suite mon code lors de l'ouverture de la userform, mais comment faire? (utiliser un truc du genre sub UserForm1_Open() (...) )?
Merci d'avance pour votre aide et bonne aprèm,
Gaby
Lire la suite 
Réponse
+0
moins plus
Bonjour,

Suggestion :

Rendre l'option ShowModal à False ou l'ouvrir en le forçant à False

Userform1.Show False

Sub Ouverture()

    Dim A As Long, B As Long
    
    A = 5: B = 6
    UserForm1.Show False
    UserForm1.TextBox1.Value = A
    UserForm1.TextBox2.Value = B
    UserForm1.TextBox3.Value = A * B
    
    
End Sub
'


Lupin
Gaby- 22 août 2008 à 15:32
Merci beaucoup,

Mon problème est résolu et ma macro marche nikel.

Encore merci pour ta célérité,

Gaby
Répondre
0Amine0 15Messages postés dimanche 21 avril 2013Date d'inscription 23 mai 2013 Dernière intervention - 22 avril 2013 à 15:04
dsl mais je dois copier ce code ou est ce que a thisworkbook
Répondre
Ajouter un commentaire
Ce document intitulé «  execution macro à l'ouverture d'une userform  » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.

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.

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