Variablenweitergabe in Userform
06.09.2003 10:04:33
alf
ich habe zwei Userforms "Eingabe" und "Ausgabe". Im ersten soll ein Name eingegeben werden.
Dieser Name soll zusammen mit einem Wert der Tabelle zu einem Aktenzeichen umgewandelt und in der Variablen aktenzeichen gespeichert werden (Aus Meier wird M12, wenn in A1 der Wert 12 steht)
Durch Klick auf einen Button im Formular "Eingabe" soll dieses geschlossen werden und das Formular "Ausgabe" geöffnet werden. In einem Textfeld soll dort
ausgegeben werden Das Aktenzeichen lautet: M12)
Der Code für den Button im Eingabeformular lautet etwa:
Public aktenzeichen as string
Private Sub CommandButton1_Click()
aktenzeichen = left(textbox1.value,1) & range("A1").value
Eingabe.hide
Ausgabe.show
Ausgabe.textbox1.Value = aktenzeichen
End Sub
Leider bleibt das Textfeld im Ausgabeformular leer.Die Variable wird offensichtlich nicht weitergegeben.
Wer kann mir weiterhelfen
Vielen Dank,
alf