Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
728to732
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Kontexmenu rechte Maus-Taste

Kontexmenu rechte Maus-Taste
Roger
Nabend
Ich würde gerne das Kontexmenu (rechte maus-Taste in Tabelle) verändern finde aber keinen Beitrag dazu.
Habt ihr ne Idee?
Roger

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Kontexmenu rechte Maus-Taste
04.02.2006 00:31:42
Josef
Hallo Roger!
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Sub CellMenu()
Dim objComBar As CommandBar
Dim objCBarBtn As CommandBarButton

Set objComBar = Application.CommandBars("Cell")

With objComBar
  .Reset
  
  Set objCBarBtn = .Controls.Add(msoControlButton)
  
  With objCBarBtn
    .Style = msoButtonIconAndCaption
    .Caption = "Hallo! Ich bin der neue!"
    .FaceId = 59
    .TooltipText = "Neuer Button"
    .OnAction = "TestMakro"
    .BeginGroup = True
  End With
  
  Set objCBarBtn = Nothing
  
End With

Set objComBar = Nothing
End Sub



Sub TestMakro()
MsgBox "Hallo " & Application.UserName & "!"
End Sub


'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
AW: Kontexmenu rechte Maus-Taste
04.02.2006 00:39:10
Roger
Uhi Supi
Werde ich gleich mal ausprobieren.
Thx Roger

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige