Verschieben von Zeilen mittels VBA



Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Verschieben von Zeilen mittels VBA
von: Dietmar K.
Geschrieben am: 05.06.2002 - 11:50:49

Hi
Habe folgendes Problem:
Möchte gern mit VBA Zeilen in einer Tabelle verschieben
- i und LastNeu sind nummerisch

Rows(i & ":" & i).Cut
Rows(LastNeu & ":" & LastNeu).Insert Shift:=xlDown

eine ganze weile hat der script funktioniert, jetzt stopt er in der cut - zeile mit Laufzeitfehler 1004
habe rows schon durch range ersetzt dies funtionierte nur einmal seit dem ist auch da der laufzeitfehler 1004

nach oben   nach unten

Re: Verschieben von Zeilen mittels VBA
von: L.Vira
Geschrieben am: 05.06.2002 - 12:11:09

Das funzt schon und so reichts auch:
Rows(i).Cut
Rows(LastNeu).Insert Shift:=xlDown

nach oben   nach unten

Re: Verschieben von Zeilen mittels VBA
von: Dietmar K.
Geschrieben am: 05.06.2002 - 12:23:23

Ja, es lief ja auch eine ganze weile stabil, ohne probleme.
seit zwei tagen kommt dieser laufzeitfehler 1004.
auch im test modus.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Verschieben von Zeilen mittels VBA"