Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1012to1016
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

Bereich markieren und kopieren

Bereich markieren und kopieren
03.10.2008 22:42:00
Thomas
Hi,
ich habe hier ein Makro das mir die Zeilen und Spalten markieren soll welche Daten enthalten in dem es mir die letzte befüllte Zeile und Spalte sucht, anschliessend diesen Bereich makiert und kopiert, dann ein anderes Tabellenblatt öffnet einen Range ("A6:K4") selectiert und dort die Daten ablegt.
Das klappt schon mal mit dem Code ganz gut.
Mein Problem ist nun, das beim erneuten kopieren von Daten die vorhandenen überschrieben werden, und eigentlich sollten diese nur angefügt werden.
Leider steh ich auf dem Schlauch und komm nicht weiter...;-)
Hier mein Code:

Sub Bereich_markieren()
Dim lngLetzteZeile As Long
Dim lngLetzteZeile_Neu As Long
lngLetzteZeile _
= Worksheets("Report finance").Range("A65536"). _
End(xlUp).Row
' Markieren von A3 bis An
Worksheets("Report finance").Range(Cells(6, 11), _
Cells(lngLetzteZeile, 1)).Select
Selection.Copy
Sheets("Invoices").Select
lngLetzteZeile_Neu _
= Worksheets("Invoices").Range("A65536"). _
End(xlUp).Cells
Worksheets("Invoices").Range(Cells(6, 11), _
Cells(lngLetzeSpalte, 1)).Select
Range("A4:K4").Select
ActiveSheet.Paste
End Sub


Gruß
Thomas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich markieren und kopieren
03.10.2008 22:56:00
Thomas
Hallo an alle....
Problem konnte ich lösen.....
Danke für Eure Hilfe.....
Thomas
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige