Discussion :

[zaki_1982]

bonjour

j'ai un fichier excel qui contient un macro qui s'execute automatiquent lors de l'ouverture du fhichier et dans mon sode VBA j'utilise ce code pour enregister le fichier dans un autre répertoire et fermer le fichier ma demande ce que je veux enregister ce fichier sans copier le marco dans le 2 ème fichier pour que je ne tombe pas sur l'execution automatique du macro quand je veux ouvrir le 2 éme fichie

voila le code que j'utilse pour enregistrer et fermer le fichier

Code :

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

1
2
3
4
5
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs ("c:\test.xls")
 
 
Application.Quit

merci

[Jean-Pierre49]

Bonjour et bienvenu


tu crée une feuille que tu cache (visible = false)

Avant d’enregistrer ton nv fichier tu met une valeur en A1 par exemple

Et dans ta macro

Code :

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

1
2
3
4
5
Private Sub Workbook_Open()
    If Sheets("PageCachée").[A1] = "ce que tu veux" Then Exit Sub
 
    ' ton ancien code
End Sub

Jean pierre

[zaki_1982]

merci, mais ca marche pas toujours quand j'ouvre mon fichier test.xls le macro s'execute automatiquement

[Jean-Pierre49]

Tu es sur que tout y est

Parce qu'avec Exit Sub ............


Ta macro est bien ds ThisWorkbook?


Jean Pierre

[zaki_1982]

est ce que je dois créer la macro sur le fichier caché que j'ai créé?

Merci