Discussion :

[zeralium]

Bonjour,

Comment lancer une macro que lorsque une autre macro est terminé.

[fring]

Bonsoir,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub MaMacro1()
'...
'code
'...
MaMacro2 '<-- exécution de la macro MaMacro2
End Sub

[zeralium]

Ma premiere question manqué de précision...
En fait j'ai une premiere macro qui importe des données sur un classeur dont la mise en forme est "pré-etablie". A la fin de cette macro je souhaiterai activer une Private Sub Worksheet_SelectionChange.

[fring]

Ya une solution éventuelle assez simple, cela consiste à mettre une condition dans l'évènement SelectionChange, par exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("IV65535") = 1 Then
    '...action
End If
End Sub

et en fin de la macro qui activra l'évènement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub MaMacro()
'...
'code
'...
Range("IV65535") = 1
End Sub

Reste à voir à quel moment désactiver l'évènement

[zeralium]

Ok ca fonctionne, merci pour ton aide.

[Gorfael]

Salut zeralium, et le forum
Comme c'est une instruction Private Sub Worksheet_SelectionChange tu peux simplement mettre à la fin de ta macro
activecell.offset(0,1).select (ou offset(1,0))=> comme tu changes ta sélection, la macro se déclenche
A+