correction

[zumye]

bonjour le forum
quelqu'un peut me corriger sur un placement de vba, j'ai placé ce programme dans this workbook :

Private Sub Workbook_Open()
Application.CommandBars("ply").Enabled = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("ply").Enabled = True
End Sub

cela me permet de ne pas faire de clic droit sur les onglet, ca marche bien mais le problème est quand j'ouvre un autre classeur excel en même temps et bien celui ci également ne peut avoir de clic droit sur onglet tant que l'autre est ouvert. je pense que j'ai mal pose ce vba.
ou dois-je le placé? ou le corriger
merci

 

[SergiO]

Re : correction

Bonjour zumye,

Pour limiter le code à ce classeur, remplace par ceci :

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CommandBars("ply").Enabled = False
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CommandBars("ply").Enabled = True
End Sub

@+

 

[zumye]

Re : correction

merci ca m'evitera bien des problème