ich habe eine Function, die auf mehrere UserForms angewendet werden soll. Leider will das nicht klappen und ich erhalte immer die Meldung "Laufzeitfehler 13 - Typen unverträglich".
Stark vereinfacht dargestellt liegt mein Problem hier:
'Code in UserForm1
Private Sub CommandButton1_Click()
FormEdit (Me)
End Sub
'Code in Modul1
Public Function FormEdit(MyForm As UserForm)
MyForm.TextBox1 = Now
End Function
Ich verstehe nicht, weshalb hier Typen unverträglich sein soll. Kann mir jemand den Fehler oder (besser noch) die Lösung erklären?Viele Grüße
Martin