Objekte in Userform per Makro ansprechen
06.11.2023 18:15:23
Robirob
Ich brauche mal Eure Hilfe - habe wohl gerade ein Brett vor'm Kopf. Die Problemstellung ist folgende:
Ich habe eine Userform ufDruckQ mit Labels und Textboxen. Diese möchte ich aus einem Makro im Modul Drucksteuerung heraus ansprechen. Userform und Makro sind im gleichen Workbook. Der Code sieht folgendermaßen aus:
Userform "ufDruckQ":
Public Function GetUserForm() As Object
Set GetUserForm = ufDruckQ
End Function
Makro im Modul "Drucksteuerung":
Public Sub FortschrittOpen()
Dim objUserForm As Object
Set objUserForm = Application.Run("GetUserForm")
objUserForm.Fortschritt.Visible = True
objUserForm.Prozentangabe.Visible = True
objUserForm.Prozentzeichen.Visible = True
objUserForm.Fortschrittsrahmen.Visible = True
End SubFehler 1004: Das Makro GetUserForm kann nicht ausgeführt werden....
Bin für Augenöffner dankbar.
Anzeige