Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1868to1872
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Versetzung der Werte in den Spalten

Versetzung der Werte in den Spalten
13.02.2022 18:33:20
Thomas
Guten Tag,
ich habe zwei Spalten und ich möchte in der Spalte "B" die Werten ein Schritt nach Oben verstezt werden und die Werten in der Spalten "C" zwei schritten nach Oben.
Mein Code:

Sub test()
ActiveSheet.Select
Range("B:B").Select Shift:=xlUp, CopyOrigin:=xlFormatFromLeftOrAbove
Range("C:C").Select Shift:=xlUp, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
>

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Versetzung der Werte in den Spalten
13.02.2022 18:44:39
ralf_b
dein Code wählt die ganze Spalte aus. Die geht schon bis ganz oben. Also ist ein Versetzen nicht möglich.
Erzähl mal etwas mehr über den Datenaufbau im Blatt.
AW: Versetzung der Werte in den Spalten
13.02.2022 19:24:33
Thomas
Hallo,
ich habe eine Excel-Datei als Bspl hochgeladen.
MfG
Thomas
AW: Versetzung der Werte in den Spalten
13.02.2022 19:53:35
ralf_b

Sub hoch()
Application.ScreenUpdating = False
Range("B1").Resize(Range("B1").End(xlDown).Row - 1).Delete shift:=xlShiftUp
Range("C1").Resize(Range("C1").End(xlDown).Row - 1).Delete shift:=xlShiftUp
Application.ScreenUpdating = True
End Sub

Anzeige
AW: Versetzung der Werte in den Spalten
13.02.2022 20:10:56
GerdL
Moin Thomas,
oder so:

Range("B1,C1:C2").Delete shift:=xlUp
Gruß Gerd

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige