Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1900to1904
1900to1904
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel VBA Aktive Tabellen kopieren

Forumthread: Excel VBA Aktive Tabellen kopieren

Excel VBA Aktive Tabellen kopieren
27.09.2022 17:51:07
Wissensdurst
Hallo an die VBA Programmierer,
ich möchte das Tabellenblatt Ausgabe kopieren und in eine neue Datei kopieren aber ohne Formeln.
Alles andere soll aber mit kopiert werden z. Farbe, Zell Größe usw.
Dann soll es in einer neuen Datei abgespeichert werden.
Vorab Danke fürs Helfen!
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Excel VBA Aktive Tabellen kopieren
27.09.2022 18:58:21
werni
Hallo Wissensdurst

Option Explicit
Sub Test()
Sheets("Ausgabe").Copy
Cells.Select
Cells.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Gruss werni
AW: Excel VBA Aktive Tabellen kopieren
27.09.2022 20:24:20
Begeister
Hallo Werni,
Was muss ich bei dem VBA Code noch hinzufügen, wenn ich das Tabellenblatt Ausgabe
Zuerst einblende
Dann Deinen Code mit Kopieren
Dann wieder ausblenden
Anzeige
AW: Excel VBA Aktive Tabellen kopieren
28.09.2022 08:16:38
Oberschlumpf
Hi,
der Code von Werni ist unvollständig.
Sein Code würde direkt im Blatt "Ausgabe", welches du - erst mal - kopieren und in andere Datei einfügen willst, sofort alle Formeln gegen ihre Ergebnisse austauschen.
Deine Formeln im Originalblatt "Ausgabe" wären also...weg!
Mich wundert, dass dir genau DAS noch nicht selbst aufgefallen ist.
Versuch es mal hiermit:

Sub sbCopyToOtherFile()
Workbooks.Add
ThisWorkbook.Sheets("Ausgabe").Copy after:=Sheets(Sheets.Count)
With Sheets("Ausgabe")
.Visible = True
.Activate
.Cells.Copy
With .Range("A1")
.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
.Select
End With
Application.CutCopyMode = False
End With
End Sub
Du schreibst ja "...in eine neue Datei kopieren".
Deswegen wird mit dem ersten Befehl eine neue Datei erstellt.
Dein bestehendes + ausgeblendetes Blatt "Ausgabe" wird kopiert und ans Ende in dieser neuen Datei eingefügt.
Nur in der neuen Datei werden jetzt alle Formeln gegen ihre Ergebniswerte ausgetauscht, und das Blatt "Ausgabe" wird in der neuen Datei eingeblendet.
Hilfts?
Ciao
Thorsten
Anzeige
AW: Excel VBA Aktive Tabellen kopieren
28.09.2022 18:42:43
Begeister
Hallo Thorsten,
das von Werner ist mir nicht aufgefallen, da ich immer eine Test Datei kopiere und darin es teste.
Ich hab Dein VBA Programm jetzt eingefügt. Dies klappt auch.
Danke!
;

Forumthreads zu verwandten Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Anzeige
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
Zeilen einfügen und kopieren
bug-i

Hallo, ich brauche eure Hilfe:
Folgende Beispietabelle:
Merkmal - Text
1 - Text1
3 - Text2
1 - Text3
1 - Text4
2 - Text5
1 - Text6
Ich möchte jetzt für jede Zeile, die ein Merkmal größer als 1 hat danach eine neue Zeile mit gleichem Inhalt einfügen.
Die T...
05.08.2009 10:11:39
Thread-ID: 1093668
2 Beiträge
Anzeige
Zeilen variabel oft kopieren und einfügen
Bernd

Hallo Forum,
ich tüftle seit einiger Zeit vergebens an folgender Aufgabe und bitte um eure Hilfe:
Ich habe in einer Mappe zwei Sheets: Tab1 und Tab2
In Tab1 importiere ich Daten mit Hilfe des Textkonvertierungsassistenten aus einer txt-Datei.
Die txt-Datei kann unterschiedlich v...
03.09.2009 17:41:35
Thread-ID: 1100389
9 Beiträge
Tabellenblätter kopieren und speichern
Bastian

Hallo zusammen,
da ich nach langem suchen nicht weiterkomme, hoffe und denke ich, dass mir weitergeholfen werden kann.
Kurz zu meinem Hintergrund: Nachdem ich Excel jahrelang eher zu Erstellung meines Stundenplans an der Uni genutzt habe, arbeite ich seit ca. 2 Jahren etwas intensiver d...
16.09.2009 10:01:09
Thread-ID: 1103108
6 Beiträge
Anzeige
aus E:E kopieren und am Ende von D:D einfügen
D:D

Hallo,
Ich habe in meiner Adressliste in D:D Straßennamen stehen, und in E:E die Hausnummern. Ich möchte die Hausnummern aber direkt hinter den Straßennamen in die selbe Zelle einfügen.
Da es sehr viele Zeilen sind möchte ich es ungern manuell machen.
Wie würdet Ihr das machen?
19.11.2009 11:46:47
Thread-ID: 1118567
3 Beiträge
Anzeige
Benutzten Bereich kopieren und einfügen
Babs

Hallo zusammen,
ich bin noch neu hier und konnte leider auf das thema von Dieter
"Benutzten Bereich kopieren von Dieter vom 19.10.2009 17:43:03 " keinen Beitrag schreiben, geht irgendwie nicht !
wenn es doch möglich ist da was reinzuschreiben dann würd ich gerne wissen wie ?
M...
07.12.2009 09:42:46
Thread-ID: 1122130
15 Beiträge
Makro kopieren und einfügen fehlerhaft
Chris

Hallo und ein frohes Neues zusammen!
Letzte Woche habe ich folgenden Beitrag geschrieben (https://www.herber.de/forum/archiv/1124to1128/t1126236.htm) und von Jürgen eine schon recht gute Antwort bekommen. Er hat mir folgendes File mit einem Makro bereitgestellt, das glaube ich relativ nahe...
04.01.2010 09:49:22
Thread-ID: 1126968
12 Beiträge
kopieren und einfügen per makro
rolf

hallo
ich möchte in tabelle 1 - zeile a3 bis a79 kopieren und dann
in tabelle 2 per makro in die erste freie zeile einfügen.
spalte b wird immer ausgefüllt.
wäre dankbar für eure hilfe.
mfg rolf
10.01.2010 22:49:24
Thread-ID: 1128765
11 Beiträge
Zeile einfügen und kopieren
Matthias

Hallo zusammen,
ich habe wieder mal ein kleines Problem und komme nicht ganz zurecht damit.
Ich habe ein Tabellenblatt mit z.Zt. knapp 4000 Einträgen (Zeilen) und mehreren Spalten (Spalten A bis AB).
Jetzt will ich irgendwo eine neue Zeile einfügen, dabei sollte der Inhalt von einig...
12.03.2010 07:32:25
Thread-ID: 1145269
10 Beiträge
Kopieren und einfügen wenn beschrieben dann rechts
Eva-Maria

Hallo zusammen,
Ich brauche wiedermal eure hilfe. Ich habe zwei Tabellenblätter und möchte vom "CHF" Tabellenblatt Daten in das "Jan" Tabellenblatt kopieren. Wenn nun das Jan Tabellenblatt in dieser Zeile schon etwas eingetragen hat dann sollte es eine Zeile nach rechts eintragen. Wie muss...
24.06.2010 07:37:58
Thread-ID: 1163793
3 Beiträge
Kopieren und einfügen
Manfred

Hallo zusammen,
ich raffs mal wieder nicht.
Wie kann ich die kopierten Felder nebeneinander in die Datenbank Spalten B2, C2, und D2 schreiben.
Neue Daten müssen lückenlos nach unten eingeschrieben werden.
Sub Datenbank() Dim LZ As Long Sheets("Anforderung").Range("F2:I3").Copy'...
22.10.2010 08:29:44
Thread-ID: 1183422
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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