Interdire clic droit onglet
bonjour ,j'ai un gros souci je voudrait interdire le clic droit sur onglet mais ma macro ne marche et je sais pas pourquoi
si quelqu'un peut m'aider:Private Sub Workbook_Open()
Application.CommandBars("ply").Enabled = False 'masquer clic droit onglet
Application.CommandBars("Cell").Enabled = False 'masquer clic droit feuille
Application.AskToUpdateLinks = False 'mise a jour sans message
Application.DisplayFullScreen = True 'pleine ecran
ActiveWindow.DisplayGridlines = False 'masquer le quadrillage
ActiveWindow.DisplayHeadings = False ' Masquer les en-têtes
Dim F As Worksheet, Tmp As String
Tmp = Format(Now - (5 / 24), "d")
On Error Resume Next
Set F = Sheets(Tmp)
On Error GoTo 0
If Not F Is Nothing Then
F.Activate
On Error GoTo fin
Else
MsgBox "La feuille " & Tmp & " n'est pas présente", 64, "Attention"
End If
lancer_timer
Exit Sub
fin: Sheets("1").Select
End Sub
merci a vous
Bonjour,
merci de respecter les règles du forum en balisant le code !
Sinon pour interdire le clic droit, cela se passe dans le module de code de la feuille de calculs
au niveau de l'évènement ad'hoc en paramétrant sa variable Cancel = True …
re bonjour pour repondre a ta question je ne sait pas comment on balise le code merci de m'avoir prevenu
autrement tu peut me dire ou je peut trouver module de code de la feuille de calculs
merci a toi
Il y a une icône pour le code !
Dans le VBE, au lieu d'ouvrir un module normal entrer dans le module de la feuille de calculs, c'est juste visuel …