Inhalte verschieben

• Inhalte verschieben von Jutta vom 17.11.2003 10:56:35
  • AW: Inhalte verschieben - von PeterW am 17.11.2003 11:13:29
    • AW: Inhalte verschieben - von Jutta am 17.11.2003 13:23:59

Betrifft: Inhalte verschieben
von: Jutta
Geschrieben am: 17.11.2003 10:56:35
Hallo,

ich habe in einer Tabelle jeweils die Mat.Nr. und die Bezeichnung untereinander stehen. Jetzt möchte ich, dass ab einer bestimmten Zelle jeweils die 2. Zelle in die daneben liegende Zelle, aber eine Zelle höher (= neben der Mat.Nr.) steht. Wie geht das ?

Beispiel:

Ist:
c2 = Mat.Nr.
c3 = Bezeichnung

Soll:
c2= Mat.Nr.
d2= Bezeichnung

Gruß

Jutta

Betrifft: AW: Inhalte verschieben
von: PeterW
Geschrieben am: 17.11.2003 11:13:29
Hallo Jutta,

mit VBA gut dürfte dir das helfen (habe einfach die in C jetzt leeren Zeilen komplett gelöscht)

Sub Umbau()
Dim lgZeile As Long
For lgZeile = Range("C65536").End(xlUp).Row To 8 Step -2
Cells(lgZeile - 1, 4) = Cells(lgZeile, 3)
Rows(lgZeile).Delete
Next
End Sub

Gruß
Peter

Betrifft: AW: Inhalte verschieben
von: Jutta
Geschrieben am: 17.11.2003 13:23:59
Hallo Peter,

Danke ! Klappt wunderbar !

Gruß

Jutta

Excel-Beispiele zum Thema " Inhalte verschieben"
Einlesen von Zellinhalten in Variablen	Zellinhalte zeilenweise sortieren
Textprogramm starten und Inhalte von Zelle A1 eingeben	Wiederherstellung des alten Zellinhaltes bei unerlaubten Werten
Bereiche in Abhängigkeit eines Zellinhaltes drucken	Die tatsächliche Anzeige eines Zellinhaltes per VBA abrufen
Zellinhalte in Verbindung mit Variablen in Textdatei schreiben	Zellinhalte aus Einzelblättern in Deckblatt übertragen
Excel-Zellinhalte in Worddokument einlesen um per Email versenden	Zellinhalte über VBA verbinden