Mehrdim. Array
06.12.2002 11:48:42
Andreotti
In der Spalte 'B' habe ich Bezeichnungen, deren Inhalt zuvor wortweise in anderem Code auf die Spalten 'AA' bis 'AF' verteilt wurde. Die Einträge in den Spalten 'AA' bis 'AF' dienen nun als Suchkriterien für meinen FIND-Ansatz und sollen erst zeilen- dann spaltenweise durchlaufen werden.
Bei mehr als einem Treffer soll ein 3-dim Array gefüllt werden:
Dim 1 = Volle Bezeichnung aus Spalte 'B'
Dim 2 = Zughörige Stadt
Dim 3 = Zeilennummer des Treffers (damit ich den Treffer später weiterverarbeiten kann)
Wenn aber in Spalte 'A' bereits ein Eintrag vorliegt, dann soll der jeweilige (vermeintliche) Treffer übergangen werden.
Nun erhalte ich mit meinem Code stets die folgende ERR Msg (beim Aufruf der MsgBox, mit der ich mal ein Ergebnis Testen will, aber auch beim Aufruf der UserForm):
'Index ausserhalb des gültigen Bereichs'
...und die macht mich langsam Irre.
Hier mein Code: