Herbers Excel-Forum - das Archiv

Wert aus Kontextmenü zeigen lassen

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
Excel-Beispiele zum Thema "Wert aus Kontextmenü zeigen lassen"
Anzeigen von Werten und Formeln UserForm in Abhängigkeit einer RefEdit-Auswahl anzeigen
Eingangsbildschirm anzeigen Den vorhergehenden Zellwert in einer zweiten Zelle zeigen
Fortlaufende Uhrzeit in Zelle und Statusleiste zeigen Userform in der Entwicklungsumgebung anzeigen
Ein Bild sekundenlang anzeigen lassen Laufwerke im Dialog zur Auswahl anzeigen lassen
Bild für einen Zeitraum von weniger als 1 Sekunde zeigen ComboBox in Abhängigkeit von einer CheckBox anzeigen