AW: userform ins programm einbinden
07.09.2005 17:51:59
Ralf
...
mit Call kannst Du Funktionen aufrufen, aber keine Form. Und selbst beim Aufruf von Funktionen kannst Du das Call weglassen.
Bsp. Du willst aus der Prozedur Ausgang die Prozedur mit dem Namen Zeigen aufrufen.
Sub Ausgang()
Zeigen 'das ist der Aufruf
End Sub
'Jetzt kommt die Prozedur
Sub Zeigen()
Msgbox "Ich wurde gerade aufgerufen"
End Sub
....oder...
Funktionsaufruf
Sub Ausgang2()
Dim a as integer, b as integer
a = 10
b = 2
'Aufruf der Funktion Rechnen mit Übergabe von a und b
Msgbox rechnen (a, b)
Userform1.Textbox1 = Rechnen (a, b)
End Sub
'Jetzt die Funktion selbst...
Function Rechnen(Zahl1 as integer, Zahl2 as integer) as Integer
Rechnen = Zahl1 + Zahl2
End Function
Du kannst natürlich auch der Form Werte übergeben. Bsp.: Userform1.Height = Rechnen(a, b)
aber ob das so sinnvoll ist?
Ciao, Ralf