Aanroepen van Popup/commandbar Insert Table via VBA

Status
Niet open voor verdere reacties.
E v R

E v R

Terugkerende gebruiker
Lid geworden
22 okt 2008
Berichten
1.563
Is er een methode om via VBA het menuutje/dialog/popup "Create Table" op te roepen?
Deze roep je op middels Ctrl+t of Ctrl+L (evt. afhankelijk van taalversie) of middels het Lint [Insert, Table]

iets in deze trant:

Code: 
Application.CommandBars.FindControl(ID:=xxxx).Visible = True
Application.CommandBars.FindControl(ID:=xxx).Execute
Application.Dialogs(yyyy).Show

In ieder geval niet middels sendkeys.

Aangezien in de VBE -window code niet te benaderen is wanneer het menuutje openstaat lijkt het mij van niet, maar wellicht heeft iemand een suggestie?
 

Bijlagen

  • Create Table.PNG
    Create Table.PNG
    21,5 KB · Weergaven: 53
Laatst bewerkt:
Code: 
Sub M_snb()
    Application.Dialogs(796).Show
End Sub

Aktiveren met dubbelklik:

Code: 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Application.Dialogs(796).Show
    Cancel = True
End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan