ich möchte gerne vom einem Formular aus, beim Click auf einen Button, an ein modul den Namen des Formulars übergeben, damit ich ihn dort in einer With-Anweisung verwenden kann. Wie funktioniert das ???
warum keine With-Anweisung im Formular selbst, beispielsweise mit CommandButton_Click??
Gruß
Peter
Sub TestForm(strTest As String)
MsgBox "Name der aufrufenden Form ist: ", strTest
End Sub
Sub Ruf
TestForm Me.Name
End Sub
Gruß
Micha
die Sub's funktionieren soweit, allerdings kann ich den Namen leider nicht in der with-Anweisung verwenden. Bei der Hilfe zu ME. habe ich ein Bespiel genau für das gefunden was ich suche:
Sub FormFarbeÄndern(FormName As Form)
FormName.BackColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
End Sub
FormFarbeÄndern Me
Leider kommt beim Kompilieren die Meldung Benutzerdefinierter Typ (as Form) nicht definiert. Welchen Verweis muss man Aktivieren dass es funktioniert?