Muss leider gestehen, dass ich nicht weiß, was ein Change-Ereignis ist und was für Prozeduren gemeint sind, geschweigedenn, wo ich das hinschreiben soll, sorry. Leider Anfänger.
Probier mal diesen Code:
Das Dropdown Menu muss auf Position A1 in Tabelle1 sein. Den Code kopierst Du im VB Editor (in Excel - Alt+F11) in die Tebelle 1 rein.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo Fehler
Application.EnableEvents = False
If Target.Address = „$A$1“ Then
Select Case LCase(Target.Value)
Muss leider gestehen, dass ich nicht weiß, was ein
Change-Ereignis ist und was für Prozeduren gemeint sind,
geschweigedenn, wo ich das hinschreiben soll, sorry. Leider
Anfänger.
Hallo GTE,
Ansicht–Symbolleisten—Steuerelemettoolbox.
Ziehe die Maus langsam über die Symbolleiste, bei „Kombinationsfeld“ klickst du auf das Symbol und „ziehst“ es dir im Blatt auf.
Dann klickt du doppelt darauf, du bist dann gleich im richtigen Modul und siehst das Gerüst des Change-Ereignisses.
Das veränderst du dahingehend:
Private Sub ComboBox1_Change()
Application.Run ComboBox1.Text
End Sub
Nun machst du im Editor links einen Doppelklick auf „DieseArbeitsmappe“ und fügst dort ein:
Private Sub Workbook_Open()
Worksheets(„Tabelle1“).ComboBox1.List = _
Array(„Makro1“, „Makro2“, „Makro3“, „Makro4“, „Makro5“)
End Sub
Die makronamen mußt du natürlich anpassen.
Dann schließt du den Editor, dann die Mappe. Nun die Mappe neu öffnen…
Jetzt musst du mir nur noch verraten, wie Du das Dropdown-Menü eingebettet hast und dann hast Du mir völlig neue Möglichkeiten in meiner „sehr kleinen“ Excelwelt gegeben.
