Werte aus der UserForm ans Mackro übergeben
21.10.2004 10:37:38
mich
ich habe folgendes Problem.
Ich habe dieses Mackro geschrieben:
Sub test()
UserForm1.Show
MsgBox MS
End Sub
und die dazugehörige UserForm:
Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "ZMD"
.AddItem "ZQ"
End With
End Sub
Private Sub CommandButton1_Click()
Dim MS As String
MS = ComboBox1.Text
UserForm1.Hide
End Sub
leider wird der String "MS" nicht an den Sub Test (hier brauch ich ihn) übergeben.
Vielleicht hat einer von euch eine Idee wie man das Problem löst
Vielen Dank im voraus