Simuler l’appui sur un bouton dans un userform

Fermé

mijean94 Messages postés 413 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 12 septembre 2024 - 24 nov. 2016 à 14:51
mijean94 Messages postés 413 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 12 septembre 2024 - 25 nov. 2016 à 13:58

Bonjour,

Est-il possible de simuler l’appui d’un bouton qui est dans un UserForm, en ajoutant cette fonction dans le code d’une procédure.
Par exemple dans mon cas je souhaiterais qu’après la ligne « LabPatience = "Ok !!!" » est affiché la procédure continue sans passer par le deuxième code si dessous.


Private Sub BoutImage_Click()
    If IsNumeric(FormTapisserie.tbxNbCol) Then
        If IsNumeric(FormTapisserie.tbxLumi) Then Sheets("F1").[A30] = CLng(FormTapisserie.tbxLumi)
        ChargeImage
                LabPatience = "Ok !!!" 'Affiche OK sous le bouton de validation
        LabPatience.Visible = True
        numerotation               
    Else
        MsgBox "message"
    End If
End Sub

Private Sub BoutQuitte_Click()
    Unload Me 
End Sub

Merci pour l’aide

Bien cordialement

A voir également:

Simuler l’appui sur un bouton dans un userform
Réinitialiser chromecast sans bouton - Guide
Comment faire une capture d'écran sur un samsung sans bouton ? - Guide
Bouton reinitialisation pc - Guide
Bouton marche arret i o - Forum Word

1 réponse

Réponse 1 / 1

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 711
24 nov. 2016 à 16:08

Bonjour,

la procédure continue sans passer par le deuxième code si dessous.

Comprends pas tout !!!!! Vous pouvez developper

mijean94 Messages postés 413 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 12 septembre 2024 11
25 nov. 2016 à 10:22

Bonjour,

Merci d'avoir pris du temps sur mon post.

Ce que je souhaite :

Simuler l’appui d’un bouton qui est dans un UserForm, donc ne pas utiliser le code ci dessous pour que la suite de mon programme continu sans attendre cette commande.

Private Sub BoutQuitte_Click()
Unload Me
End Sub

Bien cordialement

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 711 > mijean94 Messages postés 413 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 12 septembre 2024
25 nov. 2016 à 10:58

Bonjour,

Vous voulez fermer la forme dans cette procedure

Private Sub BoutImage_Click()

avant end sub , ecrivez unload me

mijean94 Messages postés 413 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 12 septembre 2024 11 > f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024
25 nov. 2016 à 11:11

Re,

Oui je souhaite fermer l’userforme sans passer par

Private Sub BoutQuitte_Click()
    Unload Me 
End Sub

Mais en faisant comme si j’avais réalisé l’appui sur le bouton qui actionne cette sortie afin que la suite du code soit bien réalisée.

Si je rajoute uniquement unload me avant end sub, mon code va bien comprendre qu'il faut faire la suite ?

Bien cordialement

Re,

Ben, comme je ne connais
Si je rajoute uniquement unload me avant end sub, mon code va bien comprendre qu'il faut faire la suite ?
le debut et la suite du code, peux pas vous dire

Re,

Ma question initiale était,

Comment sortir de l'userforme comme ci on avez réalisé l'appui sur le bouton (boutquitte_click) sans avoir réalisé cette action mais que le code ai compris l'appui sur le bouton vient d'être effectué ?

Bien cordialement

Discussions similaires

Quel est la touche shift sur le clavier

Bouton enfoncé

ou est la touche shift sur un clavier

Bouton verrouillage enfoncé

Bouton volume - enfoncé impossible d'utiliser mon téléphone