Wie man eine Section Line um das Menü für VBA mit Excel hinzufügen

Mitglieder-Login

InformationenMicrosoft Access

Wie man eine Multiple Stacked -Diag… Wenn Sie Datensätze in einer Microsoft Excel-Tabelle haben , dann haben Sie auch die Möglichkeit, ei
Wie man eine Funktion in einer Exce… Eine Funktion ist eine schriftliche Formel geschrieben von und gespeichert in Microsoft Excel. Diese
Wie man Daten in Microsoft Excel 20… Microsoft Excel bietet viele Möglichkeiten, um Daten in Ihre Tabelle formatieren , und mehrere Forma
Wie man Excel- Spreadsheets inverti… Benutzer können Spalten und Zeilen von Daten in einer Microsoft Excel-Tabelle ohne erneute Eingabe d

Software

HOME

* Computer Wissen >> Software >> Microsoft Access >> .

Wie man eine Section Line um das Menü für VBA mit Excel hinzufügen

Wenn Sie fertig sind schriftlich ein Excel-Makro , Sie wollen oft einen einfachen Weg, um es zu starten . Viele Benutzer wählen Sie eine traditionelle Tastatur-Shortcut , während andere eine andere Methode , wie eine Schaltfläche , die das Makro läuft , wenn darauf geklickt wählen . Wenn Sie eine wirklich außergewöhnliche Makro geschrieben habe , aber möchten Sie vielleicht , um es direkt auf den Excel-Menü . In Excel 2003 , verwenden Sie Visual Basic für Applikationen ( VBA) , um einen neuen Menüpunkt zu erstellen. Fügen Sie so viele Möglichkeiten , wie Sie möchten . Brechen Sie die Optionen in Gruppen mit Schnittlinien , und du wirst eine professionelle benutzerdefinierte Menü haben . Anleitung
1

Starten Sie Excel 2003 .
2

Öffnen Sie die Visual Basic -Editor. Wählen Sie "Extras ", dann " Makro " und dann " Visual Basic Editor" aus dem Menü.
3

Legen Sie eine leere Modul für den Code . Wählen Sie "Einfügen " und dann " Module" aus dem Menü.
4

Starten Sie ein neues Unterprozedur . Geben Sie den folgenden :

Sub CustomMenu ()

Excel fügt automatisch ein "End Sub "-Anweisung
5

Variablen definieren . . Geben Sie den folgenden zwischen der "Sub" und "End Sub " Aussagen :

Dim MenuObject Wie CommandBarPopup

Dim MenuItem As Object
6

Löschen Sie alle vorhandenen Instanzen von Ihr benutzerdefiniertes Menü . Dies verhindert, dass Duplikate , wenn Sie den Code mehr als einmal ausführen . Geben Sie den folgenden : . .

On Error Resume Next

Application.CommandBars (1) Controls ( " & My Macro" ) löschen

On Error GoTo 0
Seite 7

neues Menüpunkt namens "My Macro . " Verwenden Sie einen Parameter -Wert von 10 in der "Set" -Anweisung, um es zu platzieren , bevor " Hilfe ", dem 10. Punkt auf der Excel-Menü . Geben Sie den folgenden : .

Set MenuObject = Application.CommandBars (1) Controls.Add ( Type: = msoControlPopup , Before : = 10 , temporäre : = True)

MenuObject.Caption = " & My Macro "
8

in beiden Elemente in das Menü , mit einer Schnittlinie zwischen ihnen. Erstellen Sie die Schnittlinie durch den Parameter " BeginGroup "-Eigenschaft in der zweiten Artikel zum

Set MenuItem = MenuObject.Controls.Add ( Type: = msoControlButton ) "Wahre . "

MenuItem.OnAction = " MacroName "

MenuItem.Caption = " & Run "

Set MenuItem = MenuObject.Controls.Add ( Type: = msoControlButton )

MenuItem.OnAction = " Über "

MenuItem.Caption =" & Über Macro "

MenuItem.BeginGroup = True
9

Führen Sie den Code . Wählen Sie "Ausführen ", dann " Ausführen auf Sub /UserForm " aus dem Menü. Wenn Sie an der Tabelle zurückkehren, werden Sie "My Macro" auf der Speisekarte zu sehen , vor der " Hilfe . " Klicken Sie , um die beiden Menüpunkte , durch eine Schnittlinie getrennt zu sehen.