Hallo ich nochmal
Hab jetzt ein verschalteltes for/if-Konstrukt gebaut. Das Problem ist bei der For Each Schleife mit iVar. Die Range müsste da
ja je nach Wert der vorherigen Schleife sein. Das Problem ist das der Wert nur eine Zahl ist, und keinen Buchstaben enthält.
Wie kann ich in dieser Schleife angeben das die richtige Spalte gewählt wird??
Hier der Code:
For Each dok In Dokumente
If UserForm1.ComboBox1.value = dok Then
For iFillList = 2 To range("Z10").End(xlToRight).Column
If Sheet3.Cells(10, iFillList) <> "" Then
If UserForm1.ComboBox1.value = Sheet3.Cells(10, iFillList) Then
Debug.Print Sheet3.Cells(10, iFillList)
For iVar = 11 To range(iFillList).End(xlDown).Row
If Sheet3.Cells(iVar, iFillList) <> "" Then
UserForm1.ListBox1.AddItem Sheet3.Cells(iVar, iFillist)
Else
End If
Next iVar
Else
End If
Else: GoTo Fin
End If
Next iFillList
Else
End If
Fin:
Next