mit folgendem Makro kann ich die Namen und den Type aller Active-X-Elemente in einer Userform auflisten - jetzt möchte ich alle Active-X-Elemente auf einem Tabellenblatt auflisten - funktioniert offenbar etwas anders.
Sub SU_UserForm_Elemente_auflisten_Name()
Dim sTmp$, sNam$, Ctrl As MSForms.Control
Dim uFor As Object
Set uFor = UserForm 'Anpassen! Name der UserForm
For Each Ctrl In uFor.Controls
sNam = Ctrl.Name
sTmp = sTmp & TypeName(Ctrl) & vbtab & sNam & vblf
Next Ctrl
MsgBox sTmp
End Sub
Danke für Eure Hilfe Pepi