Zellen verschieben ohne Select - (@Hajo?)
05.09.2003 22:05:58
Matthias G
ich habe eine Tabelle (Dienstplan) mit einem Tabellenkopf (15 Zeilen) und mehreren Einträgen (je Eintrag 16 Zeilen).
Jetzt will ich einen Eintrag nach oben oder unten verschieben.
Ich bastle mit die Bereiche zusammen und führe dann folgende Befehle aus:
b1 ist der zu verschiebende Bereich, b2 ist die Zielzelle, wo eingefügt werden soll.
Rows(b1).Cut
Range(b2).Select
Selection.Insert Shift:=xlDown
Das funktioniert auch prima, aber jetzt möchte ich mal Hajos Ehrgeiz wecken (99% ohne Select) und das Ganze ohne Select realisieren. Geht das? Woher weiß Excel dann, wohin der Bereich verschoben werden soll?
Oder ist das ein 1%-Fall ?
Viele Grüße,
Matthias