Herbers Excel-Forum - das Archiv

Zugriff auf Steuerelemente

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

Betrifft: Zugriff auf Steuerelemente
von: Kai

Geschrieben am: 11.02.2005 17:02:36
Hallo,
ich habe folgende Frage:
Ich möchte per Programmcode (Makro in Modul1) den Status von Steuerelementen aus einer Tabelle auslesen.
Z.B. so
If Tabelle1.Optionsfeld4.Value=Checked then
mache dies
else
mache jenes.
end if.
Meine Fragen lautet nun wie das geht und wie die Steuerelemente heißen. Im Formular wird z.B. Opionsfeld 4 angezeigt.
Gruß
Kai
Bild

Betrifft: AW: Zugriff auf Steuerelemente
von: K.Rola
Geschrieben am: 11.02.2005 17:06:17
Hallo,
so z.B.:
Sub test()
If ActiveSheet.Shapes("Option Button 1").ControlFormat.Value = 1 Then
MsgBox "Optionbutton1 ist ausgewählt!"
Else
MsgBox "Optionbutton1 ist nicht ausgewählt!"
End If
End Sub

Gruß K.Rola
Bild

Betrifft: AW: Zugriff auf Steuerelemente
von: Kai
Geschrieben am: 11.02.2005 17:11:46
Vielen Dank
Kai
Bild

Betrifft: AW: Zugriff auf Steuerelemente
von: Kai

Geschrieben am: 11.02.2005 17:33:01
Hallo,
doch noch eine kleine Frage:
In dem Code steht
ActiveSheet.Shapes(.....
Da ich mich aber in einem Modul befinde kann ich nicht mit ActiveSheet arbeiten.
Ich müsste auf ein andere Tabelle zugreifen, also z.B. If Worksheets("Firmenstruktur").
wie geht das ?
Gruß
Bild

Betrifft: AW: Zugriff auf Steuerelemente
von: K.Rola

Geschrieben am: 11.02.2005 17:36:27
Hallo,
deine Begründung ist ja abenteuerlich, da ist das aktive Excelblatt gemeint,
aber bitte:
Sub test()
If Sheets("DeineTabelle").Shapes("Option Button 1").ControlFormat.Value = 1 Then
MsgBox "Optionbutton1 ist ausgewählt!"
Else
MsgBox "Optionbutton1 ist nicht ausgewählt!"
End If
End Sub

Gruß K.Rola
 Bild
Excel-Beispiele zum Thema "Zugriff auf Steuerelemente"
VBA-Zugriff auf geschlossene Arbeitsmappe. Zugriff auf geschlossene Arbeitsmappen
Zugriff über SVERWEIS() auf eine Artikelliste Zugriff auf Zellen unter Verwendung eines Bereichsnamens
Rechnungsformular mit Zugriff auf Kunden- und Artikelstamm Zugriff auf VB-Editor verhindern, solange Arbeitsmappe geöffnet
Steuerelemente aus Tabellenblatt löschen