Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellinhalte versetzen

Forumthread: Zellinhalte versetzen

Zellinhalte versetzen
18.11.2004 10:46:26
Jutta
Hallo,
ich versetze die Zellinhalte von Spalte A immer eine Zeile nach unten.
Klappt auch prima. Nur warum fügt das Makro anschließend eine ganze Spalte ein?
A ist dann leer und alles ist nach rechts verschoben...

Sub Umbau()
Dim lgZeile As Long
Columns("A:A").Select
Selection.Insert Shift:=xlDown
Selection.ColumnWidth = 16.43
Range("A1").Select
For lgZeile = Range("C65536").End(xlUp).Row To 3 Step -1
Cells(lgZeile - -1, 2) = Cells(lgZeile, 2)
'Rows(lgZeile).Delete
Next
End Sub

Was mache ich da falsch ?
Gruß
Jutta
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellinhalte versetzen
18.11.2004 10:51:56
grumble
hi
also
For lgZeile = Range("C65536").End(xlUp).Row To 3 Step -1
ist hier range("C65636") nicht spalte 3
und hier
Cells(lgZeile - -1, 2) = Cells(lgZeile, 2)
cells(lgzeile xxx,2) die 2 deutet auf spalte 2
AW: Zellinhalte versetzen
18.11.2004 10:55:06
Jutta
Hallo,
Danke ! Da habe ich wirklich Tomaten auf den Augen gehabt.
Gruß
Jutta
Anzeige
AW: Zellinhalte versetzen
18.11.2004 11:19:37
Jutta
Hallo,
ich hab's die beiden Zeilen waren zuviel:
Selection.Insert Shift:=xlDown
Selection.ColumnWidth = 16.43
Gruß
Jutta
AW: Zellinhalte versetzen
18.11.2004 11:16:08
Jutta
Hallo,
nein, dass kann nicht sein. Die 2 ist schon die Zeile !
Gruß
Jutta
AW: Zellinhalte versetzen
18.11.2004 11:24:34
grumble
aber bei cells(x,y) ist es immer so : (RowIndex, ColumnIndex)
also spalte ist der 2. wert
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige