Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
912to916
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
912to916
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

in erste freie zelle einer Spalte kopieren

in erste freie zelle einer Spalte kopieren
13.10.2007 12:43:00
franz
Hallo Excel Profis
kann mir vieleicht jemand weiterhelfen?
suche schon siet tagen nach einem code,
mit dem die zellen p5:q5 kopiert werden,
und weiters in die erste freie zelle der Spalten p:q eingefügt werden.
danke im vorraus
franz

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: in erste freie zelle einer Spalte kopieren
13.10.2007 12:54:00
Worti
Hallo franz,
zB. so:

Sub kopiere()
Dim lngEndeP As Long, lngEndeQ As Long
lngEndeP = Cells(Rows.Count, "P").End(xlUp).Row
lngEndeQ = Cells(Rows.Count, "Q").End(xlUp).Row
Range("P5:Q5").Copy Destination:=Range("P" & Application.Max(lngEndeP, lngEndeQ) + 1)
End Sub


Gruß Worti

AW: in erste freie zelle einer Spalte kopieren
13.10.2007 13:33:00
franz
Danke für die schelle Antwort!
klappt supper.
habe noch eine weitere Frage?
wie kann ich denn letzten wert wieder löschen?
nochmals danke im vorraus
franz

AW: in erste freie zelle einer Spalte kopieren
13.10.2007 13:41:00
Worti
Hallo,
so: Range("P" & Cells(Rows.Count, "P").End(xlUp).Row).Clear 'oder ClearContents
Gruß Worti

Anzeige
AW: in erste freie zelle einer Spalte kopieren
13.10.2007 14:24:07
franz
Hallo Worti
Bedanke mich nochmals recht herzlich für die prommten und präziesen Lösungen!
DANKE
franz

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige