Autres Ouvrir "Icône Formulaire"

[AIXELS]

Bonjour à tous les Amis du Forum.
Une fois de plus, je reviens vers vous pour solliciter votre aide.
J'aurais souhaité via une macro ouvrir "Formulaire" de la barre d'accès rapide.
Voir image écran jointe.
Merci pour aide.
Bien cordialement.

 

[chris]

Bonjour
Dérouler le bouton tout à droite de la barre de lancement puis Autres Commandes

Sélectionner "toutes les commandes "et descendre jusqu'à trouver Formulaire pour l'ajouter

Pas besoin de coder

 

[sousou]

Bonjour
sinon
Sub Macro1()

ActiveSheet.ShowDataForm
End Sub

 

[chris]

RE

Macro inutile qui marchera où pas pas selon où est elle enregistrée alors que le bouton natif fonctionnera...

 

[patricktoulon]

bonjour
le formulaire ne s'affichera pas si au moins une cellule n'est pas sélectionnée dans un TS ou TCD
et pour être sur , taper directe sur le bouton avec la simulation par commandbars.executemso

Sub test()
    Dim N As String
    On Error Resume Next
    N = ActiveCell.ListObject.Name
    On Error GoTo 0
    If N <> "" Then
        CommandBars.ExecuteMso ("DataFormExcel")
    Else: MsgBox "selectionez au moins une cellule dans un tableau structuré ou TCD"
    End If
End Sub

le petit msgbox qui va bien et qui te dis que tu es dans les choux
patrick