VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Trennlinie in Kontextmenü einfügen

Gruppe

Menue

Bereich

Context

Thema

Trennlinie in Kontextmenü einfügen

Problem

Wie kann ich im Zellkontextmenü eine Trennlinie einfügen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




ClassModule: Tabelle1

Private Sub CommandButton1_Click()
    Call Trennlinie
End Sub

StandardModule: basMain

Sub Trennlinie()
   With CommandBars("Cell")
      .Controls(.Controls.Count - 1).BeginGroup = True
   End With
End Sub

Sub Zurueck()
   With CommandBars("Cell")
      .Controls(.Controls.Count - 1).BeginGroup = False
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Menue und Context