Re: code:
04.06.2003 13:12:29
ChrisL
Hallo OaieDer Fehler ist mir ziemlich suspekt. Ich gehe davon aus, dass du den Codeteil alleine auch schon in einer neuen Mappe getestet hast und es dort auch nicht funktioniert. Ich nehme auch mal an, dass sich das Sub im richtigen Modul befindet, da es ja schliesslich mit rein nummerischen oder nicht-nummerischen Blätter funktioniert.
Kommt mir eigentlich nur noch etwas in den Sinn. Entweder testen das Blatt mit der Nummer anzusprechen oder mal mit einer MsgBox den Blattnamen abfragen.
MsgBox Sheets(1).Name
oder
For i = 1 to Sheets.Count
msgbox Sheets(i).Name
Next i
Gruss
Chris