Wert aus Kontextmenü zeigen lassen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Wert aus Kontextmenü zeigen lassen von: Mathias Läber
Geschrieben am: 07.04.2005 10:11:05

Hallo alle zusammen,
gibt es eine Möglichkeit, wenn man aus dem Kontextmenü der Zellen einen Befehl wählt (z.B. kopieren oder einfügen), sich die Caption des Befehls als MsgBox ausgeben zulassen? Möchte das gern weiter bearbeiten.
Bsp.: In Zelle A1 klicke ich die rechte Maustaste, wähle den Befehl -Kopieren-, dann soll eine MsgBox erscheinen mit dem Wort -Kopieren-
Das soll dann für jeden Menüeintrag so sein

Vielen Dank für eure Hilfe

Bild


Betrifft: AW: Ich wüsste es nur so, wenns reicht ? von: chris b
Geschrieben am: 07.04.2005 10:21:48

Hallo Mathias, ich kann dir leider erst einmal nur so weiterhelfen.
Und zwar baust du damit einfach das Cells Menü neu auf und wenn du dann eben auf Kopieren klickst starte das Makro Kopieren und das Makro soll dann eben als erstes eine msgbox ausführen.Sorry besser weiß ich es nicht.

Sub KonTextMenu()
Dim Ctrl As CommandBarButton
    With CommandBars("Cell")
        While .Controls.Count > 0
            On Error Resume Next
            .Controls(1).Delete
        Wend
        Set Ctrl = .Controls.Add(msoControlButton)
        With Ctrl
            .Caption = "MeinBefehl"
            .OnAction = "MeinMakro"
        End With
    End With
End Sub



Bild


Betrifft: AW: ein fertiges beispiel. von: chris b
Geschrieben am: 07.04.2005 10:25:47

IN ein Modul:
Sub KonTextMenu()
Dim Ctrl As CommandBarButton
    With CommandBars("Cell")
        While .Controls.Count > 0
            On Error Resume Next
            .Controls(1).Delete
        Wend
        Set Ctrl = .Controls.Add(msoControlButton)
        With Ctrl
            .Caption = "kopieren"
            .OnAction = "coppy"
        End With
    End With
End Sub


in ein neues Modul u.B
Sub coppy()
MsgBox ("kopieren"), , ActiveCell.Address
ActiveCell.Copy
End Sub





und so hättest du dann den copy befehl fertig.


Bild


Betrifft: AW: Wert aus Kontextmenü zeigen lassen von: Mathias Läber
Geschrieben am: 07.04.2005 10:40:08

Nein hat leider nicht geklappt. Aber danke für Deine Mühe ....
Noch ne kurze Frage
Kann man beim -onAction- Befehl die Anzeige des Menüs (Caption)an eine Variable übergeben? Das würde vielleicht mein Problemchen lösen =:))

Grüße


Bild


Betrifft: AW: Wert aus Kontextmenü zeigen lassen von: Bert
Geschrieben am: 07.04.2005 10:47:47

Hi,
verstehe ich das richtig, dass die Originalfunktionalität erhalten bleiben soll und
zusätzlich eine Variable übergeben wird?

mfg Bert


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Wert aus Kontextmenü zeigen lassen"