Si feuille active

[Fabien]

Bonjour le forum

Je souhaiterais écrire une macro
qui puisse se lancer que si la feuille est active à l'ouverture du fichier

La macro est
Range("A1:M4").Select
ActiveWindow.Zoom = True

Merci
A+

 

[Rai]

Bonjour,

Essaie ceci :

Private Sub Workbook_Open()
Nom = "Feuil2"
If ThisWorkbook.ActiveSheet.Name = Nom Then
Range("A1:M4").Select
ActiveWindow.Zoom = True
End If
End Sub

Bonne continuation,

Rai

 

[Fabien]

Exellent Rai

Merci

A+