Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 14:45:54
Verknüpfung Tabelleneinträge mit Datumsspalte
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1900to1904
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
1900to1904
1900to1904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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!

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
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!

309 Forumthreads zu ähnlichen Themen

Beim erstellen Tabellenblatt VBA Code eintragen | Herbers Excel-Forum
Robert
Guten morgen Leute,
wer kann mit helfen?
Ich möchte per VBA Code in dem neuer erstellten Tabellenblatt mit Namen XY einen Quellcode
reinschreiben z.b.
in einer Spalte AF addiere Zellen wenn die eine Zahl enthalten.
Mit dank im Voraus
Robert
23.05.2009 09:00:32
Thread-ID: 1076816
22 Beiträge
Anzeige
VBA variables Tabellenblatt ansprechen
Stefan

Hallo zusammen,
ich möchte über Eingabe in Zelle A1 bestimmen aus welchem externen Tabellenblatt Daten eingelesen werden sollen. Leider schaffe ich es nicht die Zelle als Variable zu gestalten:
Public Sub data()
Dim objWB As Workbook, objWS As Worksheet, objWSImport As Worksheet, ob...
16.11.2009 16:14:31
Thread-ID: 1117681
8 Beiträge
Verweis auf Spalte und zeile einer Tabelle
Julian

Liebe Excelgemeinde,
angenommen ich habe eine Spalte [PersNummer] in einem als Tabelle formatiertem Bereich,
wie kann ich Zeile 5 aus Spalte [PersNummer] in eine Formel einbinden?
Vielen Dank schon im Voraus,
Julian t.
23.11.2009 15:51:02
Thread-ID: 1119514
6 Beiträge
Anzeige
Buttons in einer Tabelle ansprechen und löschen
Tom

Hallo ihr Profis.
ICh habe ein Problem mit einem Makro von mir.
Ich möchte gern dass in dem Makro alle Buttons abgefragt werden und die die sich in der entsprechenden Spalte befinden gelöscht werden.
Ich habe das bisher so realisiert:
For Each ButtonShape In Sheet.Sh...
14.10.2010 06:51:24
Thread-ID: 1181892
5 Beiträge
2 Spalten einer Tabelle einer anderen zufügen
Ralf

Hi Folks,
Ich habe eine csv-Tabelle mit 5000 aufgewählten Produkten aus einem Pool von 24000 Artikeln. Eine Zweite Tabelle (im txt-Format) beinhaltet alle 24000 Artikel mit gleichlautenden Artikelnummern aber anderen Infos. Jetzt möchte ich aus der Tabelle mit 24000 Artikeln zwei Infospalte...
20.10.2010 08:18:51
Thread-ID: 1183151
6 Beiträge
VBA, automatisch Tabellenblätter erstellen
Tim

Hallo zusammen,
ich habe hier ein Makro, dass mir in Abhängigkeit des Zellenwertes A3 automatisch ein Tabellenblatt mit dem Namen des Zelleninhalts erstellt.
Sub NeuesBlatt() 'Varialen deklarieren Dim ws As Worksheet, wb As Workbook, sName As String ' Name des neuen Blattes auslesen s...
21.04.2012 11:33:55
Thread-ID: 1260338
3 Beiträge
Inhalt einer ganzen Tabelle ansprechen
Ximena

Hallo :)
Ich programmiere gerade eine Makro im PowerPoint. Ich weiss, das hier ist ein Excel Forum, aber da ich hier die besten Antworten auf meine Fragen bekomme, kann ich es ja dann vielleicht aufs PPT duplizieren :)
Nun gut, ich suche auf einem Slide nach dem Shape, das eine Tabelle...
31.05.2012 11:00:22
Thread-ID: 1265522
3 Beiträge
Spalte X aus 20+ Blättern in einer Tabelle kopiere
Jones

Hallo,
ich muss regelmäßig aus einer Exceltabelle, Text aus bestimmten Blättern kopieren und die Wörter mit Notepad++ zählen.
Ich suche eine Möglichkeit entweder:
1. die betroffenen Spalten aus den betroffenen Blättern zu kopieren
und in eine neue Tabelle einfügen und dann den d...
05.02.2013 11:26:39
Thread-ID: 1297710
10 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
21
1
7
5
2
4
5
2
2
9
2
2
2
7
5
6
1
3
4
3
5
5
2
4
19