XL 2010 Macro à l'ouverture de fichier

[Sissou71]

Bonjour,

J'ai créé une macro à l'ouverture de fichier pour masquer le volet de requêtes de classeur Query mais ca ne fonctionne pas :

Private Sub Workbook_Open()

Sheets("Toto").Activate
Application.CommandBars("Requêtes de classeur").Visible = False
Range("A2").Select
ActiveWorkbook.RefreshAll​

End Sub

Quelqu'un saurait-il pourquoi ?

 

[Lone-wolf]

Bonjour Sissou

Si c'est l'ajout de l'onglet Complément alors

Option Explicit
Public u As Byte
Public CalcTaskID
Public CharmapTaskID
Public Const MyCommandBarName As String = "Carnet d'adresses ..."

Sub DeleteMyCommandBar()
' Efface la barre d'outils MyCommandBarName
    On Error Resume Next
    Application.CommandBars(MyCommandBarName).Delete
    On Error GoTo 0
End Sub

Sub CreateMyCommandBar()
' Création de la barre d'outils personnalisée MyCommandBarName
    Dim cb As CommandBar, cbb As CommandBarButton
    Application.ScreenUpdating = False
    DeleteMyCommandBar    ' au cas où celle-ci existe déjà
    Set cb = Application.CommandBars.Add(MyCommandBarName, msoBarFloating, False, True)
    AddMenuToCommandBar cb, True
End Sub

 

[Sissou71]

Bonjour Lone-Wolf,
Ce n'est pas tout à fait cela. Lorsque que je crée une requête via query et que je charge le résultat sous forme d'un tableau dans Excel, Excel affiche dans l'onglet de ce tableau le volet de requête Query (qui permet de réactualiser la requête et de la modifier). Je voudrais que les utilisateurs du tableau n'ai pas ce volet qui apparaisse et je souhaite le fermer à l'ouverture du fichier par macro.

Application.CommandBars("Requêtes de classeur").Visible = False m'est proposé quand je crée une macro par enregistrement mais ne fonctionne pas.

 

[Lone-wolf]

Re,

Et en mettant Application.CommandBars("Requêtes de classeur").Delete?

 

[Sissou71]

Ca ne fonctionne pas non plus... Je verrai ce point quand les utilisateurs auront la version 2016 avec Query présent sur les postes. Pour le moment ils ne savent pas que cela existe, n'ont donc pas l'onglet et donc pas la requête de classeur qui s'affiche. Merci Lone-wolf