=?ISO-8859-1?Q?Laufzeitfehler_9_Index=FCberschreitung?=

[[email protected]]

Hallo,
Ich habe folgenden Code geschrieben, und bekomme von Zeit zu Zeit
einen Laufzeitfehler 9 (Indexüberschreitung). Wann und wieso ist mir
ein Rätsel!
Der Wert, der in der String-Variablen test drin steht ist nicht leer!!


On Error GoTo Marke
Application.DisplayAlerts = False
test = Worksheets("Länderansicht").Range("A" & i).Value
''''''''FEHLER''''''''''''''''''''''''''''''''''''''''''''''''''
Worksheets(test).Select ''''''''''HIER TRITT DER FEHLER AUF
'''''''FEHLER'''''''''''''''''''''''''''''''''''''''''''''''''''
Worksheets("Länderansicht").Select
Worksheets("Länderansicht").Activate
Worksheets(test).Delete
Marke:
Application.DisplayAlerts = True


Die Frage ist, wieso hier trotz der Fehlerbehandlung ein
Laufzeitfehler auftreten kann??
Vielen Dank im Vorraus,
Michael

[Fredrik Wahlgren]

This is an English group, please translate or post to a German newsgroup.

/Fredrik

<[email protected]> wrote in message
news:[email protected]...
> Hallo,
> Ich habe folgenden Code geschrieben, und bekomme von Zeit zu Zeit
> einen Laufzeitfehler 9 (Indexüberschreitung). Wann und wieso ist mir
> ein Rätsel!
> Der Wert, der in der String-Variablen test drin steht ist nicht leer!!
>
>
> On Error GoTo Marke
> Application.DisplayAlerts = False
> test = Worksheets("Länderansicht").Range("A" & i).Value
> ''''''''FEHLER''''''''''''''''''''''''''''''''''''''''''''''''''
> Worksheets(test).Select ''''''''''HIER TRITT DER FEHLER AUF
> '''''''FEHLER'''''''''''''''''''''''''''''''''''''''''''''''''''
> Worksheets("Länderansicht").Select
> Worksheets("Länderansicht").Activate
> Worksheets(test).Delete
> Marke:
> Application.DisplayAlerts = True
>
>
> Die Frage ist, wieso hier trotz der Fehlerbehandlung ein
> Laufzeitfehler auftreten kann??
> Vielen Dank im Vorraus,
> Michael