Fehlermeldung "falscher Wert für Eigenschaft" Lauf

[sascha11]

erhalte bei Makro oben genannte Fehlermeldung, kann jemand helfen?

der Code

[code]
Dim aktZeile
aktZeile = 2
Dim maxZeile
maxZeile = OT2.getCellRangeByName("B1")
Dim Datum
Dim aktWert
Dim Zeile

Do While aktZeile = maxZeile
[/code]

Danke!

[sascha11]

in B1 steht 611

[Stephan]

Falls OT2 richtig initialisiert ist, sollte Reichen:

Code: Alles auswählen

maxZeile = OT2.getCellRangeByName("B1").Value

Gruß
Stephan

[sascha11]

danke!