Résolu - Macro qui s'active sur tout les classeurs excel ouvert

[aleks73]

Bonjour,

Novice en VBA, j'ai ecris une macro dans le "thisworkbook" pour cas l'ouverture du fichier celui-ci passe en mode "utilisateur" (un mode pleine ecran).
Mon probléme est que cette macro s'active sur tout mes autres classeurs excel ouvert. Est-il possible de la restreindre seulement a ce classeur ?
Merci pour votre aide

Cordialement,

PS: Voici le code dans le workbook
Private Sub Workbook_Open()
'
' ActiverLeModeUtilisateur Macro
'
'
Application.DisplayFormulaBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayFullScreen = True
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayZeros = False
End With
End Sub
Private Sub Workbook_beforeclose(Cancel As Boolean)
'
' DesactiverLeModeUtilisateur Macro
'
'
Application.DisplayFormulaBar = True
ActiveWindow.DisplayWorkbookTabs = True
Application.DisplayFullScreen = False
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = True
.DisplayZeros = True
End With
End Sub

 

[Lone-wolf]

Bonjour aleks et bienvenue sur XLD

Essaie comme ceci

Dim Wbk As Workbook

set Wbk = Workbooks("Nom du classeur avec macro") exemple = "Classeur1.xlsm"

With Wbk
La macro
End With
If ActiveWorkbook.Name <> WbK Then Exit Sub

EDIT: Bonjour PMO

 

[PMO2]

Bonjour,
Essayez de remplacer votre code par celui qui suit :

Private Sub Workbook_Activate()   'modif
'
' ActiverLeModeUtilisateur Macro
'
'
Application.DisplayFormulaBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayFullScreen = True
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayZeros = False
End With
End Sub

Private Sub Workbook_Deactivate()   'modif
'
' DesactiverLeModeUtilisateur Macro
'
'
Application.DisplayFormulaBar = True
ActiveWindow.DisplayWorkbookTabs = True
Application.DisplayFullScreen = False
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = True
.DisplayZeros = True
End With
End Sub

 

[aleks73]

Bonsoir,

Merci a tout les deux pour vos réponses,

Cela fonctionne nickel avec l'activate

Bonne soirée