Hallo Freunde,
Schreibe gerade ein Turnierplanet gekoppelt mit VBA.
Mein Problem folgendes. Ich habe 2 Blätter: eines heisst "Scorer" und das andere "5er-Gruppe". Beim Scorerblatt habe ich eine Funktion erstellt, dass solange eine Zelle ausgewählt werden soll, solange diese einen Inhalt hat. Der Name dieser Funktion ist "Scorerliste" und sieht folgendermaßen aus:
=Scorer!$A$2:INDEX(Scorer!$A$2:$A$30;ANZAHL2(Scorer!$A$2:$A$30);1)
Nun möchte ich diese Liste mit einer Combobox in einer Userform verbinden, sodass die Einträge angezeigt werden, die ich vorher in diese Zellen geschrieben habe. Laut Anleitung sollte dieses so gehen:
Private Sub UserForm_Initialize()
With Me
.cboScorer.List = Range("Scorerliste").Value
End With
End Sub
Jetzt kommt aber ein Laufzeitfehler 381 und ich weiss echt nicht wo das Problem ist.
Wer kann mir da helfen ? :D
|