noch ein letztes Problem..
05.11.2003 11:41:48
golem
habe fogenden COde:
...
....
For Each ws In ThisWorkbook.Worksheets
For x = 0 To 100
If ws = 2002(x) Then ws.Cells(5, 10).Value = 2003(x)
If ws = FC02(x) Then ws.Cells(19, 11).Value = FC03(x)
Next
Next
in der 3. Zeile kommt die Fehlermeldung: Objekt unterstützt die Eigenschaft oder Methode nicht.
Ich vermute es liegt daran das man ein Sheet nicht mit einem String vergleichen kann. daraufhin habe ich ws zu String konvertiert- aber die Meldung kommt immer noch. Woran könnte das liegen?
Gruß
Golem
Anzeige