Hallo... ich möchte mir durch einen Klick auf das Ok button bestimmte Werte in Excel rausgeben lassen. Den Code habe ich soweit fertig programmiert. Allerdings bekomme ich immer die Meldung, dass die Variable nicht definiert ist (z). Wenn ich diese definiere, kommt diese Meldung bei temp=o...
Hat da jemand eine Idee, woran das liegen könnte?
Private Sub CmdOK_Click()
Dim x As Integer
z = Sheets(1).UsedRange.Rows.Count
x = TextBox1
temp = 0
For i = 2 To z
If Cells(i, 1) = x Then
temp = 1
Exit For
End If
Next
If temp = 1 Then
Unload Me
zeile = i
UserForm2.Show
Else
MsgBox "nicht vorhanden!", vbExclamation
TextBox1 = ""
End If
LG