Hallo,
zunächst vielen Dank für die Ausführung und Erklärung. Meine Absicht war nicht mit mehreren Treads Völker zu beschäftigen, sorry dafür.
Zu dem Code: Soweit funktioniert es bis auf, dass im Modul selbst das Array nicht erscheint bzw. darauf zugegriffen werden kann.
In der Function selbst wird es korrekt befüllt. In meinem Modul greife ich wie folgt darauf zu (versuche ich zumindest):
For n = 1 To letzteZeile
Name = Nummer(n, 3) & " " & Nummer(n, 4)
If GetSelectedListItems(1) = Name Then
MsgBox "Test3§
ElseIf AuswahlPerson(i) = "" Then
MsgBox "Test2"
End If
Next
Vermutlich greife ich nicht korrekt auf das Array zu, weiß allerdings nicht wie es besser bzw. korrekt geht.
Danke soweit.
|