Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
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
436to440
436to440
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt unter bestimmten namen speichern VBA

Forumthread: Tabellenblatt unter bestimmten namen speichern VBA

Tabellenblatt unter bestimmten namen speichern VBA
08.06.2004 15:51:14
der
Hallo!
Ich will ein aktives Tabellenblatt ohne rückfragen in einer datei speichern dessen name und pfad in bestimmten zellen eines weiteren tabellenblattes stehen. wie kann ich das machen.
Vielen vielen Dank im Voraus!
der alex
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt unter bestimmten namen speichern VBA
Ramses
Hallo
schau mal in der VBA Hilfe unter "Save As".
Da sind ein paar Beispiele dabei, ansonsten gibt es unter dem Suchbegriff massenhaft in der Recherche zu finden
Gruss Rainer
AW: Tabellenblatt unter bestimmten namen speichern VBA
08.06.2004 16:08:24
ANdreas
Hallo Alex,
so in etwa:

Sub Speichern()
Dim wb As Workbook
ActiveSheet.Copy
With ThisWorkbook.Worksheets("Tabelle1") 'anpassen (da stehen Pfad + Name)
On Error GoTo ErrorHandler
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs .Range("A1") & "\" & .Range("B1") & ".xls"
Application.DisplayAlerts = True
ActiveWorkbook.Close
End With
Exit Sub
ErrorHandler:
MsgBox Err.Description, , "Fehler: " & Err.Number
Application.DisplayAlerts = True
End Sub

Hinweis:
Pfad in A1 in der Form: C:\Temp\Test
Name in B1 in der Form: DateiX (.xls wird automatisch ergänzt)
Hoffe das hilft weiter,
Andreas
Anzeige
;

Forumthreads zu verwandten Themen

VBA-Code - Datei speichern unter; Schleife
Schulze

Halli Hallo,
ich habe eine kurze frage. und war geht es darum, dass die spalte a untersucht werden sollen. es sollen alle werte der tabelle (zeilen) kopiert werden, bis in der spalte a der wert 0 ist.
Im Folgenden habe ich eine Beispieldatei drangehangen. https://www.herber.de/bbs/user/...
21.08.2008 10:57:00
Thread-ID: 1003407
2 Beiträge
VBA Speichern unter
PeterO

Hallo!
Ich habe folgendes Problem:
über einen Commandbutton kopiert der User ein Blatt in eine neue Datei, die so dann gleich geschlossen werden soll. Hier erscheint dann der Dialog "Wollen Sie speichern? - ja - nein - abbrechen -". Ich hätte nun aber gern, dass gleich der Dialog "Speic...
28.10.2008 15:59:44
Thread-ID: 1019997
3 Beiträge
VBA Speichern unter
BuStue

Hallo Leute, schönen Guten Morgen.
KAnn man folgenden Code so umdrehen, das der Inhalt der Zelle D4 vor dem Blattnamen abgespeichert wird,
ActiveWorkbook.SaveAs SavePath & "\" & ActiveSheet.Name & " " & ThisWorkbook.Sheets("Bestandsübersicht").Range("D4").Value & "....
26.03.2009 07:58:29
Thread-ID: 1064084
4 Beiträge
VBA Speichern unter
Alexander

wie kann ich bei folgendem "speichern unter" das Abbrechen unterdrücken/deaktivieren da ich sonst eine fehlermeldung bekomme ? Sub Exportieren Aktualiesieren() ' Kopieren aktueller stand in alten Stand Range("A6:L98").Copy Sheets("Alter Stand").Select Range("a4").PasteSpecial Paste:=xlPasteValu...
25.07.2009 10:08:55
Thread-ID: 1091205
2 Beiträge
Tabellenblatt aus Datei speichern unter
Jens

Hallo Zusammen,
ich würde mich als fortgeschrittenen Excel-User bezeichnen. Habe auch mittlerweile VBA Elemente ausprobiert.
Mit Hilfe des Forums habe ich die meisten "Probleme / Lösungen" gemeistert.
Nun komme ich aber nicht mehr weiter. Hoffentlich kann mir jemand helfen.
Ich...
08.04.2014 10:57:17
Thread-ID: 1356505
10 Beiträge
Anzeige
[VBA] Tabellenblätter separat abspeichern
henrik

Hey zusammen,
ich habe eine Exceldatei die jeden Monat aktualisiert wird und mehrere Tabellenblätter enthält. Die Anzahl der Tabellenblätter variiert von Monat zu Monat.
Ich möchte jetzt per VBA Skript hingehen und automatisch jedes Tabellenblatt als separate Excel in einem Ordner absp...
26.06.2014 12:21:53
Thread-ID: 1367597
2 Beiträge
VBA Excel speichern unter Auswahlmöglichkeit?
Michael

Hall Forum,
mit folgendem Code erstelle ich mir eine neue Arbeitsmappe und speichere diese ab:
Workbooks.Add
ActiveWorkbook.SaveAs ("C:\Users\Michael\Desktop\test._" & _
Format(Day(Date), "00") & Format(Month(Date), "00") & Year(Date) & _
".xlsx")
besteht...
17.06.2015 13:04:38
Thread-ID: 1431425
3 Beiträge
VBA Speichern unter
mic13

Hallo zusammen
Ich habe eine VBA zusammengestellt, welches u.a. beim Speichern eine Messagebox anzeigt. Nun möchte ich aber, dass wenn man das Dokument "Speichern unter" anwählt, dann keine Messagebox angezeigt wird. Leider habe ich keine Ahnung, wie ich das abgrenzen kann.
Ich hoffe es...
14.08.2015 08:25:13
Thread-ID: 1442275
3 Beiträge
Per VBA Tabellenblatt speichern...
Ina

Hallo in das Forum
ich möchte per VBA die Tabelle TAB1 sichern.
Im Net habe ich folgenden Code gefunden, der allerdings einen Nachteil hat...
Sobald der Code ausgeführt wird, kann ich im Windows-Fenster "Speichern unter" zwar auf Abbrechen klicken, aber es wird trotzdem eine Datei m...
10.02.2016 20:33:42
Thread-ID: 1474619
3 Beiträge
VBA Speichern unter Wert in Zelle eintragen ...
udo

Hallo Forum,
bräuchte bitte nochmal eure Hilfe ... ich möchte per Button ausgelöst dann ein
Makro laufen lassen, dass mir zunächst das Speichern Unter Fenster aufruft
mit GetSaveAsFilename ? und wenn ich dann entsprechend einen Pfad einstelle / wähle in meinem eigenen Netzwerk, d...
03.05.2016 14:06:08
Thread-ID: 1491675
7 Beiträge
Anzeige
VBA "speichern unter" spuckt keinen Vorschlag aus
Christopher

Hallo alle zusammen. Langsam bin ich ein bisschen am verzweifeln.
Mein Makro hat bisher alles richtig gemacht, aber nach einer kleinen Änderung tut es nicht mehr wirklich das was es soll.
Sub Speichern_unter() Dim Datei As String Dim Verzeichnis As String Dim SaveDummy As Variant Verzei...
27.08.2016 03:49:51
Thread-ID: 1511460
3 Beiträge
Anzeige
Tabellenblättern einzeln speichern / unterschiedli
Marcel

Hallo zusammen,
ich bin kompletter Neuling in VBA und möchte gerne bestehende Tabellenblätter in einer Excel Arbeitsmappe in einzelne Tabellen speichern, jedoch jeweils an einen eigenen unterschiedlichen Pfad. Es gibt 8 unterschiedliche Blätter und 8 unterschiedliche Pfade.
Alle Tabel...
01.06.2017 13:06:59
Thread-ID: 1561685
5 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 ohne Rückfragen speichern in VBA

Schritt-für-Schritt-Anleitung

Um ein aktives Tabellenblatt in Excel ohne Rückfragen zu speichern, kannst Du den folgenden VBA-Code verwenden. Achte darauf, dass Du die Pfade und Namen in den entsprechenden Zellen anpasst:

  1. Öffne Excel und gehe zu dem Tabellenblatt, das Du speichern möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Füge den folgenden Code in das Modul ein:

    Sub Speichern()
    Dim wb As Workbook
    ActiveSheet.Copy
    With ThisWorkbook.Worksheets("Tabelle1") 'Anpassen
        On Error GoTo ErrorHandler
        Application.DisplayAlerts = False
        ActiveWorkbook.SaveAs .Range("A1") & "\" & .Range("B1") & ".xls"
        Application.DisplayAlerts = True
        ActiveWorkbook.Close
    End With
    Exit Sub
ErrorHandler:
    MsgBox Err.Description, , "Fehler: " & Err.Number
    Application.DisplayAlerts = True
End Sub

  5. In der Zelle A1 solltest Du den Pfad eingeben, z.B. C:\Temp\Test.

  6. In der Zelle B1 gibst Du den Dateinamen ein, z.B. DateiX. Die Endung .xls wird automatisch hinzugefügt.

  7. Schließe den VBA-Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Fehler: "Zielpfad nicht gefunden"

    • Stelle sicher, dass der Pfad in Zelle A1 korrekt eingegeben wurde und existiert.

  • Fehler: "Zugriff verweigert"

    • Überprüfe die Berechtigungen des Zielordners, in den Du die Datei speichern möchtest.

  • Keine Rückmeldung nach Ausführung des Makros

    • Achte darauf, dass Application.DisplayAlerts auf False gesetzt ist, um Rückfragen zu vermeiden.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, kannst Du das Tabellenblatt manuell speichern. Gehe dazu auf Datei > Speichern unter und wähle den gewünschten Pfad und Dateinamen aus. Diese Methode ist jedoch weniger automatisiert und erfordert mehr manuelle Schritte.

Praktische Beispiele

  1. Speichern in einem spezifischen Ordner:

    • Wenn Du immer in den Ordner C:\Temp\Test speichern möchtest, gib diesen Pfad in Zelle A1 ein.

  2. Einen Namen dynamisch verwenden:

    • Du kannst den Dateinamen in Zelle B1 ändern, um verschiedene Versionen der Datei zu speichern, z.B. Bericht2023.

Tipps für Profis

  • Makros automatisieren:

    • Du kannst das Makro so anpassen, dass es bei bestimmten Ereignissen, wie dem Schließen der Datei oder einem bestimmten Button-Klick, automatisch ausgeführt wird.

  • Fehlerbehandlung erweitern:

    • Ergänze die Fehlerbehandlung, um spezifische Fehler anzuzeigen und gegebenenfalls alternative Maßnahmen zu ergreifen.

FAQ: Häufige Fragen

1. Wie kann ich den Code anpassen, um eine andere Datei zu speichern?
Du musst lediglich die Zellen A1 und B1 anpassen, um den gewünschten Pfad und Dateinamen einzugeben.

2. Funktioniert dieser Code in Excel 2016?
Ja, dieser VBA-Code funktioniert in Excel 2016 sowie in neueren Versionen von Excel. Achte darauf, dass Makros aktiviert sind.

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