Dynamische Ausgabe
22.05.2002 12:13:34
Mirko
Sheets("Tabelle8").Select
s = (clusternummer - 1) * 3 + 1
Set linksoben = Worksheets(8).Range(1,s)
Set rechtsunten = linksoben.Offset(k, 1)
Worksheets(8).Range(linksoben, rechtsunten) = cluster_kantentour
Beim "Set linksoben..." kommt Fehler 1004 Anwendungsfehler. Gebe ich statt "1,s" z. B. "a1" ein funktioniert es, hilft mir aber nicht weiter.
Anzeige