déplacement dans macro après fermeture userform

Pierrot93

XLDnaute Barbatruc

• 29 Janvier 2008

• #2

Re : déplacement dans macro après fermeture userform

Bonjour Bellous

pas sur d'avoir tout compris... peut être un "unload me" lié à l'événement click de ton bouton... un "exit sub" dans une procédure... A voir, mets peut être un fichier en pièce jointe ou soit plus explicite sur la demande.

bonne journée
@+

 

Vote positif 0 Vote négatif

B

bellous

XLDnaute Occasionnel

• 29 Janvier 2008

• #3

Re : déplacement dans macro après fermeture userform

Bonjour pierrot93,

Pardon pour les explications confuses.
Je joint un fichier qui expliquera mieux.
Le bouton "oui " me branche à l'intruction : Range("a1").Name = "début_liste" et la macro se poursuit normalement.
Je souhaiterai que le bouton "non" me branche directement au N° 100 de ma macro.
Est-ce plus clair ?

Merci par avance

 

Pièces jointes

• exemple-oui-non-liste.zip

  13 KB · Affichages: 37
• exemple-oui-non-liste.zip

  13 KB · Affichages: 40
• exemple-oui-non-liste.zip

  13 KB · Affichages: 34

Vote positif 0 Vote négatif

B

bellous

XLDnaute Occasionnel

• 29 Janvier 2008

• #4

Re : déplacement dans macro après fermeture userform

mon problème n'a pas de solution ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 29 Janvier 2008

• #5

Re : déplacement dans macro après fermeture userform

Re

pas sur d'avoir tout compris, mais s'il s'agit de sortir de la procédure, essaye comme ceci :

Code:

Private Sub CommandButton1_Click()
     Unload UserForm4
     End
End Sub

@+

 

Vote positif 0 Vote négatif

B

bellous

XLDnaute Occasionnel

• 29 Janvier 2008

• #6

Re : déplacement dans macro après fermeture userform

très bien pour sortir de la procédure, mais j'aurai souhaité aller à l'instruction 100 de ma macro

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 29 Janvier 2008

• #7

Re : déplacement dans macro après fermeture userform

Re

alors avec une variable "public", dans le module de ton USF, code de ton bouton 2 :

Code:

Private Sub CommandButton2_Click()
    c = True
End Sub

dans le module 1, ta macro transformé modifiée :

Code:

Public c As Boolean
Sub Macro1()
        UserForm4.Show
    If c = True Then GoTo 100
        Range("a1").Name = "début_liste"
        Range("a1").Select
10   If Range("début_liste") = 0 Then Exit Sub
     If Range("début_liste") = Range("c2") Then Exit Sub
        Range("début_liste")(1, 2).Select
        ActiveCell.Name = "début_liste"
        GoTo 10
100
    c = False
End Sub

et un peu de patience... ici il n'y que des bénévoles, ce n'est pas le SAV de Microsoft.....

bon après midi.
@+

 

Vote positif 0 Vote négatif

B

bellous

XLDnaute Occasionnel

• 29 Janvier 2008

• #8

Re : déplacement dans macro après fermeture userform

Merci beaucoup Pierrot93, c'est parfait.
Excuse-moi pour mon inexpérience des posts.
Bonne journée
comment met-on que la question soulevée a trouvé la réponse ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 29 Janvier 2008

• #9

Re : déplacement dans macro après fermeture userform

Re

il n'y a pas de possibilité sur ce forum, de "flaguer" le post comme étant résolu, tu le dis dans ta réponse, c'est bien et cela suffit.

bon après midi
@+

 

Vote positif 0 Vote négatif