Perdu le menu contextuelle

[Ilino]

Bonsoir Forum

Il m'arrive un truc sans que je sache comment c'est arrivé, lorsque je fait un clic droit avec la souris sur une cellule le menu contextuel ne s'affiche pas ???

Si quelqu'un peut me dire comment rétablir cette fonctionnalité?

Merci par avance
grazie

 

[Ilino]

Re : Perdu le menu contextuelle

Re
j'ai esseyé ça

Application.CommandBars("Cell").Reset

mais ça ne fait rien de plus...
Please

 

[Dranreb]

Re : Perdu le menu contextuelle

Bonsoir.
Je ne connais qu'un cas, ce qui ne veut pas dire qu'il ne pourrait pas y en avoir d'autres: Il existerait une procédure Worksheet_BeforeRightClic dans le module de la feuille qui mettrait Cancel à True

 

[Ilino]

Re : Perdu le menu contextuelle

Re
j'ai esseyé ça

Application.CommandBars("Cell").Reset

mais ça ne fait rien de plus...
Please

merci forum
la solution est ICI

 

[Ilino]

Re : Perdu le menu contextuelle

Bonsoir Bernard
merci d'avoir lu mon message, j'ai trouvé la solution( post#4)
A+

 

[Ilino]

Re : Perdu le menu contextuelle

Re que dois je faire pour régler mon souci, chaque fois j'execure ce code

'Affichage plien ecran
Option Explicit
Private Sub Workbook_Open() 'Affichage plien ecran 1
Dim cmdB As CommandBar

Sheets("feuil3").Activate
Application.GoTo Reference:=ActiveSheet.Range("C6") ', Scroll:=True


For Each cmdB In Application.CommandBars
cmdB.Enabled = False
Next cmdB
' si tu veux masquer en plus la barre d'état
' la barre de formule
' les onglets...
With Application
.DisplayFullScreen = True
.DisplayStatusBar = False
.DisplayFormulaBar = False
End With
With ActiveWindow
.DisplayWorkbookTabs = False
.DisplayHeadings = False
End With

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Affichage plien ecran 2
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = True
Next cmdB
With Application
.DisplayFullScreen = False
.DisplayStatusBar = True
.DisplayFormulaBar = True
End With
With ActiveWindow
.DisplayWorkbookTabs = True
.DisplayHeadings = True
End With
End Sub

Bouton droit de la souris disparu ????