Comment revenir sur une macro princpale après une Private Sub.

Comment revenir sur une macro princpale après une Private Sub. - VB/VBA/VBS - Programmation

Marsh Posté le 28-06-2007 à 15:03:51    

Bonjour Forum,  
 
Je viens pour la première fois de créer des OptionsButtons à l'activation d'une macro  et l'application que je veux qu'elle réalise fonctionne.  :ange:  
Mon problème est qu'après l'exécution de ces OptionsButtons qui s'affichent le reste de ma macro ne se déroule plus. D'où la question comment revenir à la macro initiale?
 
Mon UserForm ayant comme nom "avancement" j'appelle les OptionButtons par la commande suivante: avancement.Show
 
Et voici le code de mes OptionButtons:  
 

Code :
  1. Private Sub CommandButton1_Click()
  2. Dim avance As String
  4. If OptionButton1.Value= True Then
  5. avance = "début"
  7. ElseIf OptionButton2.Value = True Then
  8. avance = "milieu"
  10. Else
  11. avance = "fin"
  13. End If
  15. Worksheets(1).Range("J14" ).Value = avance
  16. End
  17. End Sub


 
Merci d'avance tout le monde  :) .
 
 
Julien.

Reply

Marsh Posté le 28-06-2007 à 15:03:51   

Reply

Marsh Posté le 28-06-2007 à 15:19:53    

il me semble qu'il y a un end en trop (avant derniere ligne...)

Reply

Marsh Posté le 28-06-2007 à 15:31:50    

Bonjour jp check,  
 
Certes sans le end le reste de la  macro s'exécute, mais alors comment je fais pour fermer automatiquement la fenêtre avec les OptionsButtons lorsque mon transfert est fini?
 
Merci.

Reply

Marsh Posté le 28-06-2007 à 15:38:08    

ben a la fin de ta macro tu fais un  
unload me
ou un
me.hide

Reply

Marsh Posté le 28-06-2007 à 15:51:09    

Merci jpcheck ;)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed