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

Forumthread: Ans ende einer Zeile springen

Ans ende einer Zeile springen
16.06.2009 13:23:03
Felix
Hallo,
wahrscheinlich eine sehr einfache Frage für euch:
Ich möchte gerne per makro einen wert 3 zellen links vom zeilenende kopieren und an einer andere zelle wieder einfügen.
Das ganze zur einer schleife programmieren kann ich (hoffe ich) selbst.
Vielen Dank.
Felix
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ans ende einer Zeile springen
16.06.2009 13:44:07
hary
hallo Felix
meinst das Kopierte(hier Zeile 1) in einen anderen Bereich(hier Zelle E5)

Sub n()
Dim a As Long
a = Cells(1, Columns.Count).End(xlToLeft)
Range(Cells(1, a - 2), Cells(1, a)).Copy 'Beispiel nach Cells(5, 5)
End Sub


Gruss Hary

Anzeige
AW:Kleine Aenderung
16.06.2009 13:49:45
hary
Hi Felix
Frage falsch gelesen. Du meintest ja nicht Bereich,sonder nur die drittletzte Zelle. Dann so:

Cells(1, a - 2)


Gruss hary

AW: AW:Kleine Aenderung
16.06.2009 14:19:42
Felix
Man da hätte ich aber selbst drauf kommen können.
Vielen Dank!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige