Ist es Euch möglich nachzuvollziehen warum die User Form die Variablen nicht übernimmt ? Vielen Dank
Der Synthax der Variablen im Modul ist wie folgt:
Option Private Module
Public Sub Test()
'Abfrage "Kunde Name"
Dim zKName As Integer
zKName = "5"
Dim iRow As Integer
For iRow = 13 To 3000
Dim sKName As String
If Cells(iRow, zMailanKunde) = "x" Then
sKName = Cells(iRow, zKName).Value
End If
Next
End Sub
Der Code in meiner Userform ist wie folgt:
Private Sub Label1_Click()
End Sub
Private Sub UserForm_Click()
Option Explicit
Private Sub UserForm_Initialize()
Label2 = "Kunde: " & sKName
End Sub
Private Sub CommandButton1_Click()
Unload Me
End Sub
Private Sub CommandButton2_Click()
End Sub
Private Sub CommandButton3_Click()
End Sub