Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1012to1016
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopieren von Daten

Kopieren von Daten
30.09.2008 09:40:49
Daten
Hallo Excel-Gemeinde,
Für ein Projekt haben wir eine Excel-Tabelle mit mehreren Arbeitsblättern. Die „Originaldaten“ sollen erhalten bleiben, mit einer Kopie der Daten gearbeitet.
Wie kann ich die Originaldaten über VBA in ein Arbeitsblatt kopieren ohne diese Originaltabelle erst zu markieren, kopieren neues Arbeitsblatt wählen und dann einfügen.
Dazu sollte nur der Bereich der Daten enthält, kopiert werden…
Ist das möglich?
Gruß
Tom

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

Betreff
Datum
Anwender
Anzeige
AW: Kopieren von Daten
30.09.2008 11:39:00
Daten
Hallo Tom,
warum per VBA erst kopieren? Lege diese "Originaldatei" doch einfach mit all ihren Werten und Formeln als Template (.xlt) an. Dann können alle beim Öffnen (Datei -Neu) diese Datei nutzen, aber Deine Originaldatei bleibt erhalten.
Gruß
Dieter
AW: Kopieren von Daten
30.09.2008 13:32:00
Daten
Hallo Dieter,
Danke für deine schnelle Antwort. Muß mich aber gleich entschuldigen da ich was wichtiges Unterschlagen habe. Die Tabelle mit den Daten muss in eine zweite Arbeitsmappe kopiert werden.
Also die erste Arbeitsmappe enthält eine Pivot-Tabelle die Daten aus einer DB abfrägt. Zur weiteren Verarbeitung muss das Ergebniss der Abfrage in eine zweite Arbeitsmappe kopiert werden.
Sorry für die Unterschlagung....
Tom
Anzeige
AW: Kopieren von Daten
30.09.2008 17:27:00
Daten
Hallo Tom,
hier ein Beispiel als Grundgerüst. Abhängig davon, in welcher Datei du das Makro speicherst muss die Ziel-Arbeitsmappe und evtl. auch die Quelldatei anders festgelegt werden.
Am einfachsten ist es, das Makro in einer separaten Arbeitsmappe zu speichern und diese als Steuerungsdatei zum Erzeugen der Datei mit den kopierten Daten zu benutzen.
Gruß
Franz

Sub PivotdatenInDateiKopieren()
Dim wbZiel As Workbook, wksZiel As Worksheet
Dim wbQuelle As Workbook, wksQuelle As Worksheet, pvTable As PivotTable
'Neue Datei als Zieldatei mit einem Tabellenblatt anlegen, ggf. Datei anders definieren
Set wbZiel = Workbooks.Add(Template:=xlWBATWorksheet)
'Zieltabellenblatt festlegen
Set wksZiel = wbZiel.Worksheets(1)
'Datei mit originaldaten öffnen
Set wbQuelle = Workbooks.Open(Filename:="C:\Lokale Daten\Test\Kopie von 55731.xls", _
ReadOnly:=True)
'Quelltabellenblatt mit Pivottabelle festlegen
Set wksQuelle = wbQuelle.Worksheets("PivotTab")
'Pivottabelle einer Variablen zuordnen
Set pvTable = wksQuelle.PivotTables(1)
'Daten der Pivottabelle in Zieltabelle kopieren, Formate und Werte
pvTable.TableRange2.Copy
wksZiel.Cells(1, 1).PasteSpecial Paste:=xlPasteFormats
wksZiel.Cells(1, 1).PasteSpecial Paste:=xlPasteValues
'Spaltenbreiten auf optimale Breite setzen
With wksZiel
.Range(.Columns(1), .Columns(pvTable.TableRange2.Columns.Count)).AutoFit
End With
'Originaldatei wieder schliessen
wbQuelle.Close savechanges:=False
End Sub


Anzeige

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