Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
788to792
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
788to792
788to792
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Kominationsfeld im Formular

Kominationsfeld im Formular
08.08.2006 12:51:24
Micha
Hallo zusammen,
ich habe uber symbolliste Formular ein Kombinationsfeld eingegeben. ich möchte, dass bei den verschiedenen Werten in Zellverknüpfungen verschiedene Makros gestartet werden. Z.B: 1. Spieltag = 1, Makro sortieren 1. Spieltag; 2. Spieltag=2, Makro sortieren 1. und 2. Spieltag. Wie funktioniert das?
Micha

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kominationsfeld im Formular
08.08.2006 13:44:57
fcs
Hallo Micha,
Das entsprechende Makros könnte etwa so aussehen:

Sub SpieltageSortieren()
' Sortiert den in der Dropdownliste gewählten Spieltag
Dim Objekt As Shape
Set Objekt = Sheets("Tab1").Shapes("Dropdown 2")
Select Case Objekt.ControlFormat.Value
Case 1
Call Spieltag1_Sortieren
Case 2
Call Spieltag2_Sortieren
'usw. usw.
Case Else
'do nothing
End Select
End Sub
Private Sub Spieltag1_Sortieren()
MsgBox "Spieltag 1"
End Sub
Private Sub Spieltag2_Sortieren()
MsgBox "Spieltag 2"
End Sub

Den Namen der Tabelle und den Namen des Shapes (der Dropdownliste) muss du natürlich anpassen. Der Name der DropDown-Liste wird in der Namensfeldanzeige angezeigt, wenn du mit der rechten Maustaste auf das Dropdownfeld klicks.
Alle Makros in einem Modul der Datei anlegen und das Hauptmakro in der Tabelle der DropDown-Liste zuweisen.
gruss Franz
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige