XL 2016 Erreur 5 VBA

[medsoft313]

Bonjour à tous.

J'ai l'erreur 5 argument ou appel de procédure incorrecte

Private Sub Workbook_Open()

ThisWorkbook.Application.CommandBars("Quick Access Toolbar").Visible = True

End Sub

Merci d'avance.

 

[vgendron]

bonjour

application et thisworkbook inversés??
nom de la barre incorrect?

 

[medsoft313]

Et comment le corrigé. j'aimerais cacher la barre d'outil accès rapide

 

[vgendron]

bah déjà.. "cacher" et "visible=true" ... c'est antinomique...

 

[medsoft313]

bah déjà.. "cacher" et "visible=true" ... c'est antinomique...

Oui j'avoue que c'est une erreur de frappe.

 

[medsoft313]

 

[vgendron]

une recherche google donne ceci

Sub HideQuickAccessTB()
Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"",False)"
End Sub

To show it, use the next version:

Sub ShowQuickAccessTB()
Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"",True)"
End Sub

 

[medsoft313]

Merci pour la réponse oui effectivement je connais cette instruction, mais j'aimerais tout simplement cacher la barre d'outil accès rapide avec les deux flèches Undo Redo

 

[vgendron]

je pense qu'il va falloir revoir ton besoin
1) les flèches Undo Redo sont faites pour annuler ou reproduire la dernière action.
2) les actions executées par une macro ne peuvent pas etre annulées

c'est un peu comme si, dans ta voiture tu avais envie d'allumer les phares en utilisant le levier de vitesse.. et bah non. c'est pas possible, c'est pas fait pour ca

 

[medsoft313]

Oui je connais le principe c'est juste pour éviter à l’utilisateur l'utilisation des deux flèches Undo Redo