CommandBarcontrols

kingfadhel · 8 Janvier 2014

Bonsoir,
j'ai telechargé un fichier excel afin de voir comment ajouter une barre personnalisée et depuis à chaque ouverture d'excel cette barre s'incremente automatiquement.
le fichier n'existe plus sur mon pc et malgré ça la barre existe encore 😡😡😡.
voir l'image attachée.

Comment restaurer la barre par défaut ou supprimer cette barre.
Merci d'avance.

Guest · 8 Janvier 2014

Re : CommandBarcontrols

Bonjour,

Tu peux essayer:

Code:

Sub DelCommandBars()
Dim cmb As CommandBar
For Each cmb In Application.CommandBars
    If Not cmb.BuiltIn Then cmb.Delete
Next
End Sub

qui supprimera TOUTES les CommandBar qui ne sont pas d'origine (fournies à l'installation d'excel)
A+

david84 · 8 Janvier 2014

Re : CommandBarcontrols

Bonjour,
Issu de l'aide d'Excel :

CommandBar.BuiltIn, propriété
Cette propriété renvoie la valeur True si la barre de commandes précisée est une barre de commandes prédéfinie à l'application conteneur. Elle renvoie la valeur False si la barre de commandes est personnalisée. Propriété en lecture seule.
Remarque
L'utilisation des barres de commandes dans certaines applications Microsoft Office a été remplacée par la nouvelle interface utilisateur Ruban. Pour plus d'informations, recherchez le mot clé « Ruban » dans l'aide.

Syntaxe

expression.BuiltIn

expression Variable représentant un objet CommandBar.

Valeur renvoyée
Booléenne

Exemple
Cet exemple montre comment supprimer toutes les barres de commandes personnalisées qui ne sont pas visibles.

Visual Basic pour Applications
foundFlag = False
deletedBars = 0
For Each bar In CommandBars
If (bar.BuiltIn = False) And (bar.Visible = False) Then
bar.Delete
foundFlag = True
deletedBars = deletedBars + 1
End If
Next
If Not foundFlag Then
MsgBox "No command bars have been deleted."
Else
MsgBox deletedBars & " custom command bar(s) deleted."
End If

A+

Edit : salut Hasco et bonne année !

kingfadhel · 8 Janvier 2014

Re : CommandBarcontrols

Re,
merci de consacrer un temps à mon probleme, mais les deux solutions proposés n'ont pas résolu le problème.

merci quand même.

kingfadhel · 8 Janvier 2014

Re : CommandBarcontrols

Résolu avec le post suivant

+++++++

merci

CommandBarcontrols

kingfadhel

XLDnaute Impliqué

Guest

Guest

david84

XLDnaute Barbatruc

kingfadhel

XLDnaute Impliqué

kingfadhel

XLDnaute Impliqué

Discussions similaires

CommandBarcontrols

kingfadhel

XLDnaute Impliqué

Guest

Guest

david84

XLDnaute Barbatruc

kingfadhel

XLDnaute Impliqué

kingfadhel

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency