Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1024to1028
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1024to1028
1024to1028
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt kopieren

Tabellenblatt kopieren
21.11.2008 13:53:00
Gunter
Hallo Zusammen,
ich habe in meinem Workbook "Adressen2" sortierte Spalten. In dem Workbook TMP sind aktualisierte Daten, die aber nicht so sortiert sind wie ich sie in "Adressen2" benötige.
Mit: Sheets("Sheet1").Range("C:C,D:D,E:E,G:G,H:H").Copy Sheets("Tabelle1").Range("A1")
kann ich die Daten in der gewünschten Form im gleichen Workbook in eine neue Tabelle kopieren.
Wie kopiere ich aber die sortierten Daten in mein Workbook "Adressen2"?
Für zweckdienliche Hinweise herzlichen Dank.
Gruss
Gunter

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt kopieren
21.11.2008 13:57:52
Hajo_Zi
Hallo Gunter,
schreibe noch vor dem Ziel das Workbooks hin. Die Datei muss auf sein.

AW: Tabellenblatt kopieren
21.11.2008 14:11:15
Gunter
Hallo Hajo,
ich hab das jetzt so geändert
Sheets("Sheet1").Range("C:C,D:D,E:E,G:G,H:H").Copy Workbooks("Adresse2").Sheets("Tabelle1").Range("A1")
aber es wird nichts kopiert. Die Datei "Adresse2" ist offen, da aus ihr das Makro gestartet wird.
Gruss
Gunter
AW: Tabellenblatt kopieren
21.11.2008 14:42:31
Hajo_Zi
Hallo Gunter,
du hattest von 2 Dateien geschrieben und das was kopiert wird. Ich bin davon ausgegangen das der Code in der Quelldatei ist rechter Teil des Codes und das es in die Zieldatei kopiert werden soll ohne Code. Du mußt das Workbooks davor schreiben das nicht aktiv ist.
Gruß Hajo
Anzeige
AW: Tabellenblatt kopieren
21.11.2008 15:51:17
Gunter
Hallo Hajo,
ich habe vermutlich einen Teil vom Fehler gefunden. Die Datei "Adresse2" ist auf einem Netzwerklaufwerk. Da muss ich wohl den Pfad angeben? Wenn ich das ganze in eine neue Excel-Datei eingebe funktioniert es. Wie und wo muss ich denn den Pfad definieren?
Gruss
Gunter
AW: Tabellenblatt kopieren
21.11.2008 16:00:00
Hajo_Zi
Hallo Gunter,
bei geöffneten Dateien muss kein Ordner angegeben werden.
Gruß Hajo
AW: Tabellenblatt kopieren
21.11.2008 16:17:00
Gunter
Hallo Hajo,
ich bin kurz vorm verzweifeln. Das ist bestimmt ein ganz blöder Fehler den ich da mache.
Ich lade die beiden Dateien mal hoch. In der Adressen22 ist der Button Update daraufhin soll die Datei TMP geöffnet werden und die Daten von dort in Adressen22 übernommen werden.
Für deine Hilfe vielen Dank im voraus.
https://www.herber.de/bbs/user/57031.xls
https://www.herber.de/bbs/user/57030.xls
Gruss
Gunter
Anzeige
AW: Tabellenblatt kopieren
21.11.2008 16:23:00
Hajo_Zi
Hallo Gunter,
man sollte schon die richtige Tabellenbezeichnung eintragen. Das erhöht den Erfolg.

Option Explicit
Private Sub Update_Click()
Dim Blatt As Integer
Dim i As Integer
Dim LetzteZeile As Integer
Dim LetzteZeileQuelle As Long
Dim LetzteZeileZiel As Long
Application.ScreenUpdating = False
On Error GoTo errorhandler
ActiveSheet.Cells.ClearContents
Workbooks.Open Filename:=ThisWorkbook.Path & "\TMP.xls"
Sheets("Tabelle1").Range("C:C,D:D,E:E,G:G,H:H,I:I,J:J,AF:AF,AN:AN,AP:AP,AQ:AQ,AR:AR,AV:AV, _
BE:BE"). _
Copy ThisWorkbook.Sheets("Tabelle1").Range("A1")
ActiveWorkbook.Close
Application.ScreenUpdating = True
MsgBox "Daten wurden erfolgreich aus der Quelldatei übertragen."
Exit Sub
errorhandler:
Application.ScreenUpdating = True
MsgBox "Fehler: Vermutlich ist die Zieldatei gerade durch einen anderen User in gebrauch.  _
Versuchen Sie es später noch einmal."
End Sub


Gruß Hajo

Anzeige
AW: Tabellenblatt kopieren
21.11.2008 16:49:00
Gunter
Hallo Hajo,
wieder was gelernt, nochmals vielen Dank für deine Hilfe .
Gruss
Gunter

299 Forumthreads zu ähnlichen Themen

Zellen kopieren (mit Formatierung)
Yves

Hallo zusammen,
ich möchte Daten von einem Tabellenblatt (Tabelle2) in ein anderes Tabellenblatt (Tabelle1) kopieren.
Habe dies bis anhin so gelöst:
sheets("Tabelle1").cells(1,1).value = sheets("Tabelle2").cells(5,1).value
Somit wurden einfach nur die Werte 'kopiert'. Nun würde...
08.08.2008 14:09:18
Thread-ID: 1000289
8 Beiträge
Anzeige
Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
String suchen und kopieren
Daniel

Hallo,
ich bin ein VBA Neuling und der Makroaufzeichner bringt mich nicht weiter, da dieser immer selectiert und aktiviert.
Ich brauche ein etwas allgemeineren Code.
Ok was ich habe sind folgende Inputdaten:
.............A......B.........C.............D
1
2............
12.08.2008 14:55:00
Thread-ID: 1001221
9 Beiträge
Anzeige
Tastenkombinaiton Format kopieren
erkoo

Wer kennt die Tastenkombination für Format kopieren und Format einfügen?
Danke erkoo
13.08.2008 16:28:20
Thread-ID: 1001592
3 Beiträge
Datei vom Laufwerk kopieren
Walter

Guten Morgen Allerseits,
ich möchte gern, mit einem Makro, eine Datei, z.b. "Muster.xls"vom Zentrallaufwerk "R",
in mein "C" Laufwerk kopieren.
Beide Verzeichnisse sind gleich.
Danach möchte ich die das die kopierte Datei direkt geöffnet wird.
mfg Walter MB
14.08.2008 08:43:00
Thread-ID: 1001718
4 Beiträge
Datei kopieren mit xcopy
Meinolf

Hallo und guten Morgen ans Excel Forum ,
möchte gerne mit dem Befehl xcopy Dateien kopieren in vba mit Hilfe einer Variablen, der ich vorher den Pfad und Dateinamen zugewiesen habe x77. Irgendwie scheint das aber nicht zu funktionieren. Hat jemand eine Idee ?
Sub kopieren_auf_LW_f_cf(...
15.08.2008 09:47:22
Thread-ID: 1002054
8 Beiträge
Makro, das automatisch Werte kopiert und entnimmt
Maxine

Hallo zusammen,
ich brauche für meine Diplomarbeit ein Makro, das folgendermaßen funktionieren soll:
Im Sheet "Conditional Expectations K2" soll es die Werte (x und t_x) von jeder ID in Zelle B6 bzw. B7 einsetzen. Für ID 1 wären das H2 und I2 in B6 und B7, für ID 2 H3 und I3 in B6 und...
15.08.2008 13:10:23
Thread-ID: 1002150
7 Beiträge
Tabellenblatt kopieren
Pia

Hallo zusammen,
ist es möglich von einem Tabellenblatt (Januar) auf mehrere Tabellenblätter kopieren aber in der Monat Reihenfolge?
z.B. Tabellenblatt 1 heisst Januar, TB 2 = Februar usw..bis Dezember?
Wie kann ich eine Datei mit dem Namen ihres Tabellenblattes versehen?
Danke.....
17.08.2008 16:16:41
Thread-ID: 1002424
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
1
4
8
10
2
3
7
6
1
6
3
4
16
11
14
5
4
2
4
2
4
1
8
8