Dieses kleine Makro listet alle Active-X-Elemente, die auf "Tab01" sind
Sub SU_Tabelle_Elemente_auflisten_Namen_Herber()
Dim j%, sTxt$, sNam$, sTyp$, sVal$, sTmp$
Dim obj As Object
For Each obj In Tab01.OLEObjects
sNam = obj.Name
sTyp = obj.progID
'sVal = ? 'Wert von Checkbox, OptionBox, Combobox, Listfeld (markierte), etc.
sTxt = sTxt & sTyp & vbTab & sNam & vbLf
Next
MsgBox sTxt
End Sub
Wie kann ich nun die Werte von Checkbox, Combobox, OptionButton, Listfeld (alle markierten bei multiselect - mit Schlaufe) auslesen oder auch wieder Werte zuweisen. Danke für Eure wunderbare Hilfe.
LG Pepi