Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1584to1588
1584to1588
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt mit Makros als neue Datei speichern

Forumthread: Tabellenblatt mit Makros als neue Datei speichern

Tabellenblatt mit Makros als neue Datei speichern
03.10.2017 14:06:02
Harald
Guten Tag,
kann mir jemand den folgenden Code zusammenbauen?
Tabellenblatt kopieren und als neue Datei (mit den im Tabellenblatt gespeicherten Makros) und Dateinamen aus Zelle A1 am normalen Speicherort speichern (.xlsm).
Mit Recorder funktioniert das irgendwie nicht.
Die Datei soll so gespeichert werden, dass die Makros beibehalten werden.
Vielen Dank im Voraus.
Harald G.
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt mit Makros als neue Datei speichern
03.10.2017 14:20:23
Nepumuk
Hallo Harald,
das sollte genügen:
Public Sub Harald()
    Call ActiveSheet.Copy
    Call ActiveWorkbook.SaveAs(Filename:=CurDir & "\" & Range("A1").Value, _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled)
    Call ActiveWorkbook.Close
End Sub

Gruß
Nepumuk
Anzeige
AW: Tabellenblatt mit Makros als neue Datei speichern
03.10.2017 14:24:26
Guesa
Hallo Harald
Mit Zellwerten aus Tb
Public Sub Speichern()
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=Range("B1").Value & "\" & Range("C1").Value & ".xlsm", _
FileFormat:=xlOpenXMLWorkbookMacroEnabled
ActiveWorkbook.Close
End Sub
Gruß, Guesa
Anzeige
AW: Tabellenblatt mit Makros als neue Datei speichern
03.10.2017 14:28:01
Guesa
In B1 den Speicherort aus Explorer kopieren
musste natürlich anpassen. In C1 den Speichernamen
AW: Tabellenblatt mit Makros als neue Datei speichern
03.10.2017 20:04:01
Harald
Vielen Dank an Guess und Nepumuk,
Gruß, Harald
;

Forumthreads zu verwandten Themen

Fehler beim Kopieren von Tabelle in neue Datei
Tabelle

Guten Abend
Aus einer Datei möchte ich gerne eine Tabelle via "Verschieben oder kopieren" in eine neue Arbeitsmappe verschieben (mittels Aktivieren des Kästchens "Kopie erstellen").
Das ist in der Regel auch kein Problem. Doch heute scheitere ich bei einer bestimmten Datei daran, da bei...
28.08.2008 17:48:35
Thread-ID: 1005548
3 Beiträge
Bilddatei mit neuem Namen speichern
egonkernien

Hallo wer hilft bitte?
Guten Abend.
Ich möchte eine Dialogbox aufrufen, dort eine Bilddatei auswählen.
Ich möchte diese Bilddatei in ein Image1 auf einer Userform laden. Z.B. D:\Daten\Bilder\DSC0011.jpg
Dann diese Bilddatei umbenennen in D:\Daten\Test\082008_01.jpg, abspeichern...
28.08.2008 22:32:28
Thread-ID: 1005608
5 Beiträge
Durchrechnung nur für ein Blatt ausschalten
KlausF

Hallo Excelperten!
In einer Datei schalte ich beim Öffnen mittels AutoOpen-Makro die automatische Durchrechnung bisher ganz aus.
Wie kann ich aber die automatische Durchrechnung nur für ein bestimmtes Blatt (z.B. Tabelle1) abschalten?
Geht das überhaupt so eingeschränkt?
Besten...
13.09.2008 15:37:53
Thread-ID: 1009517
3 Beiträge
Anzeige
Einzelne Registerkarte in neue Datei speichern
Herbert

Hallo Experten,
ich möchte per Button eine einzelne Registerkarte meiner Excel-Datei im Format: "Text (Tabstopp-getrennt)(*.txt)" abspeichern. Die neue Datei soll im Ordner C:\temp erscheinen. Der Name der neuen Datei ist eigentlich egal.
Wäre für jeden Vorschlag dankbar.
Danke und...
14.10.2008 11:46:43
Thread-ID: 1016279
5 Beiträge
Tabellenblatt separat speichern als csv
Herbert

Hallo,
der beigefügte Code wurde mir freundlicherweise hier bereit gestellt. Aus einer Datei wird ein Tabellenblatt in eine neue Datei im Ordner C:\temp gespeichert. Das Dateiformat der neuen Datei ist csv. Die einzelnen Werte der neuen csv-Datei werden durch Semikolon getrennt. Ich benötig...
16.10.2008 16:07:00
Thread-ID: 1016905
6 Beiträge
Datei-Kopie mit aktuellem Namen speichern
Lenni

Moin Excellianer!
Ich möchte nicht nur, das meine Datei automatisch gespeichert wird, es soll auch eine Kopie der Datei an einem anderen fest definierten Ort gespeichert werden.
Folgenden Code verwende ich:
Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveWorkbook.Save Me...
11.01.2009 00:23:31
Thread-ID: 1038550
10 Beiträge
Anzeige
tabellenblatt in Excel mit neuer Instanz kopieren
chris

Hallo zusammen,
ich habe eine frage.Vielleicht könnt ihr mir helfen.
ich versuche eine Auswertung zu erstellen und diese soll in eine neue Instanz von Excel kopiert werden.
Aber irgendwie klappt das nicht :(
Ich habe unten einen code angefügt damit ich als erstes eine neue Insta...
10.02.2009 13:39:15
Thread-ID: 1049055
8 Beiträge
Einzelnes Tabellnblatt in PDF Datei speichern
Jens

Ich habe folgendes Problem, ich möchte ein einzelnes Tabellenblatt aus Excel heraus in eine Pdf Datei mittels command Buttom und Makro/ VBA speichern. Als PDF Prog nutze ich Adobe Acrobat Prof 8.0(bringt nen Converter mit).
THX im Voraus
27.02.2009 15:30:50
Thread-ID: 1054824
14 Beiträge
Anzeige
Datei mit akt. Tagesdatum speichern. Wie?
stefan

hallo,
ich ändere fast jeden tag etwas an einer datei. wie kann ich beim speichern automatisch eine version mit dateiname_aktuelles_datum.xls anlegen?
danke für eure hinweise.
05.03.2009 14:54:05
Thread-ID: 1056872
2 Beiträge
Anzeige
nur eine Tabelle anwählen, falls ...
Peter

Guten Tag
Gelegentlich wähle ich in einer Arbeitsmappe gleichzeitig mehrere Tabellen an, wenn ich beispielsweise bei allen die gleichen Änderungen durchführen will.
Nun habe ich mir eine Routine geschrieben, die auf allen Tabellen ein Passwort setzt oder entfernt.
Diese Routine läuf...
02.06.2009 09:34:43
Thread-ID: 1078545
8 Beiträge
Blätter in neue Datei kopieren
Tobiax

Hallo!
Ich möchte aus der Datei "x.xls", 5 bestimmte Tabellenblätter (A, B, C, D, E) in die Datei "y.xls" kopiert haben.
Wie bekomme ich das per Makro hin?
Toby ...
P.S.: Zur Not kann mit den 5 Blättern auch neue Datei generiert werden mit dem Namen "y.xls".
27.07.2009 11:48:47
Thread-ID: 1091559
6 Beiträge
Datei mit 14MB auf Server speichern dauert
Rupert

Hallo Leute,
Ich hätte da wieder mal ein Problem. Ich habe hier eine Datei im Excel - 2007 Format, welche Verkünpfungen & Pivot-Tabellen enthält.
Seit gestern hab ich Probleme diese Datei zu speichern. Der Zielort ist ein Netzlaufwerk.
Ich hab es mit zwei PC's ausprobiert einmal...
16.10.2009 21:26:27
Thread-ID: 1110073
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Tabellenblatt mit Makros als neue Datei speichern

Schritt-für-Schritt-Anleitung

Um ein einzelnes Tabellenblatt aus Excel als neue Datei zu speichern, insbesondere wenn Makros enthalten sind, kannst Du den folgenden VBA-Code verwenden:

Public Sub Speichern()
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs Filename:=Range("B1").Value & "\" & Range("C1").Value & ".xlsm", _
    FileFormat:=xlOpenXMLWorkbookMacroEnabled
    ActiveWorkbook.Close
End Sub
  1. Öffne Deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu: Rechtsklick auf „VBAProject (DeineDatei)“ > Einfügen > Modul.
  3. Kopiere den obigen Code in das Modul.
  4. Stelle sicher, dass in Zelle B1 der Speicherort und in Zelle C1 der Dateiname angegeben ist.
  5. Schließe den VBA-Editor und führe das Makro über ALT + F8 aus, um das Tabellenblatt zu speichern.

Häufige Fehler und Lösungen

  • Fehler: „Speicherort ungültig“

    • Lösung: Überprüfe den Pfad in Zelle B1. Er sollte existieren und korrekt formatiert sein.

  • Fehler: „Dateiname ungültig“

    • Lösung: Achte darauf, dass der Dateiname in Zelle C1 keine unerlaubten Zeichen enthält (z.B. /, \, :, *, ?, ", <, >, |).

  • Makros werden nicht gespeichert

    • Lösung: Stelle sicher, dass Du das Arbeitsblatt im .xlsm-Format speicherst, wie im Code angegeben.

Alternative Methoden

Wenn Du kein VBA verwenden möchtest, kannst Du das einzelne Blatt auch manuell speichern:

  1. Klicke mit der rechten Maustaste auf den Tab des gewünschten Arbeitsblatts.
  2. Wähle „Verschieben oder Kopieren“.
  3. Wähle „Neue Arbeitsmappe“ und aktiviere das Kästchen „Kopie erstellen“.
  4. Speichere die neue Arbeitsmappe anschließend im gewünschten Format.

Praktische Beispiele

  1. Speichern mit Makros
    Verwende den oben genannten VBA-Code, um ein Arbeitsblatt mit enthaltenen Makros zu speichern.

  2. Speichern ohne Makros
    Wenn Du nur die Werte und Formate speichern möchtest, kannst Du die Methode „Verschieben oder Kopieren“ verwenden, um das Blatt in eine neue Datei zu kopieren und dann als normale Excel-Datei zu speichern.

Tipps für Profis

  • Batch-Verarbeitung: Wenn Du mehrere Tabellenblätter speichern möchtest, kannst Du eine Schleife im VBA-Code einfügen, um alle gewünschten Blätter nacheinander zu exportieren.

  • Verwendung von Variablen: Setze Variablen für den Speicherort und Dateinamen, um den Code flexibler zu machen.

  • Fehlerbehandlung: Integriere Fehlerbehandlungsroutinen, um Probleme beim Speichern zu erkennen und zu beheben.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Tabellenblätter in eine neue Datei speichern?
Du kannst eine Schleife in Deinem VBA-Code verwenden, um mehrere Blätter zu kopieren und zu speichern.

2. Kann ich das Makro so anpassen, dass es den Dateinamen automatisch erstellt?
Ja, Du kannst den Code entsprechend anpassen, um beispielsweise das aktuelle Datum oder andere Parameter im Dateinamen zu verwenden.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige