Clic droit sur onglet

[Brat'ac]

Bonjour,

Depuis un moment dans tous mes classeurs y compris les nouveaux
je n'ai plus le clic droit sur les onglets

je suis obligé de les rétablir à chaque fois

Application.CommandBars("Ply").Enabled = True

Je n'arrive pas à trouver pourquoi dans les paramètres

Merci

[Brat'ac]

Brat'ac a écrit :

J'ai désactivé tous les compléments, Compléments Excel et Compléments
com et rien à faire c'est toujours pareil

[MichD]

Le 30/12/21 à 05:36, Brat'ac a écrit :

> le clic droit sur les onglets

Bonjour,

Ferme toutes les instances d'Excel ouvert.

Dans la barre d'adresse de l'explorateur Windows, fais un copier-coller
de ceci : %appdata%\Microsoft\Excel

Dans ce répertoire, tu devrais avoir seulement un répertoire s'appelant
XLSTART et le fichier Excel15.xlb

Si tu as d'autres fichiers ou répertoire, déplace-les vers un autre
répertoire.

Je suppose que tu n'as aucun fichier dans le répertoire XLSTART.

Ouvre Excel maintenant, est-ce que cela fonctionne bien?

MichD

[Brat'ac]

Le 30/12/2021, Brat'ac a supposé :
> Brat'ac a écrit :

Bon j'ai trouve un code qui remet tout par défaut

ici https://www.excel-downloads.com/

Sub RemiseEnPlaceExcel()

Dim Cbar As CommandBar
Dim i As Byte

'ici une boucle pour remettre enabled toutes les CommandBar d'origine

For Each Cbar In Application.CommandBars
If Cbar.BuiltIn = True Then
If Cbar.Enabled = False Then Cbar.Enabled = True
End If
Next Cbar

'ici on Remets Visible et de l'ordre (et on remets enabled dans la
Foulée au cas où !!)
With Application
.DisplayFullScreen = False
.DisplayStatusBar = True
.DisplayFormulaBar = True
With .CommandBars("Worksheet Menu Bar")
.Enabled = True
.Visible = True
End With
With .CommandBars("Standard")
.Enabled = True
.Visible = True
End With
With .CommandBars("Formatting")
.Enabled = True
.Visible = True
End With
With .CommandBars("Cell")
.Enabled = True
End With
End With

End Sub

[Brat'ac]

Le 30/12/2021, MichD a supposé :

Si cela se reproduit j'essayerais car avec le code trouvé c'était OK

Merci