Option Explicit
Private Sub Workbook_Open()
Set MonAppli.z = Application
End Sub
Option Explicit
Public MonAppli As New Classe1
Option Explicit
Public WithEvents z As Application
Private Sub z_WorkbookOpen(ByVal Wb As Workbook)
If Wb.Name = "MonClasseur.xls" Then
'ton code
End If
End Sub
Option Explicit
Public WithEvents z As Application
Private Sub z_WorkbookOpen(ByVal Wb As Workbook)
If Wb.Name = "[COLOR="Blue"]DieseArbeitsmappe[/COLOR][B][COLOR="Red"].xls[/COLOR][/B]" Then
Call formule_format
Call Eff_Perf
Call Chiffre
Call couleur
Call Mise_en_Forme
Call Objectif_Ressource
Call GPH
Call Objectif_Eff
Call Lettre_gras
Call Barres
Call Zoom
End If
End Sub
l'image c'est la struture du fichier que je veux ouvrir en automatique
Je recherche la commande qui permet d'executer une macro dans un module perso.xls à l'ouverture d'un classeur en particulier (avec son nom)
Private Sub z_NewWorkbook(ByVal Wb As Workbook)