Aber mal von vorn
Aus meiner Userform1 übergebe ich die Daten aus der Listbox2, in die Tabelle Datenerfassung zum Antrag!
Private Sub ListBox2_Click()
Sheets("Datenerfassung zum Antrag").Cells(3, 3) = Me.ListBox2
End Sub
das klappt!
Im initialize Ereignis schreibe ich folgendes
Private Sub UserForm_Initialize()
If Sheets("Datenerfassung zum Antrag").Cells(3, 3) 1 Then
ListBox2 = Sheets("Datenerfassung zum Antrag").Cells(3, 3)
End Sub
nun mein Problem:
steht in der besagten Celle ein Wert ist alles gut und es klappt, also die entsprechende Zeile in der Listbox2 wird blau makiert, somit weiß ich was in der Celle eingetragen wurde,
ist die Celle aber leer, gibt es einen Debugger!
"Eigenschaft Value konnte nicht gesetzt werden"
Es werden ja keine Daten gefunden, was kann ich machen?
Lg Lisa