Live-Forum - Die aktuellen Beiträge
Datum
Titel
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ü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Arbeitsblätter speichern

Forumthread: Arbeitsblätter speichern

Arbeitsblätter speichern
20.02.2006 10:57:58
Heike
Hi,
vielleicht kann mir jemand bei folgender Fragestellung helfen.
Ich habe eine Datei mit mehreren Arbeitsblättern. Diese haben eine eindeutige Bezeichnung. Nun sollen diese Arbeitsblätter einzeln unter der Arbeitsblattbezeichnung gespeichert werden. Ist so etwas möglich? Ich habe nämlich beim Speichern nicht die Funktion gefunden - nur Arbeitsblatt speichern -
MfG
Heike
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsblätter speichern
20.02.2006 11:24:00
Werner
Hallo Heike
Dieses Makro in ein Modul einfügen.

Sub EINZELBLATT_SPEICHERN()
PFD = Path
x = ActiveSheet.Name
Sheets(x).Copy
ActiveSheet.SaveAs PFD & x
End Sub

Das ausgewählte Blatt wird kopiert und im gleichen Verzeichnis mit dem Tabellennamen gespeichert.
Gruss Werner
Anzeige
AW: Arbeitsblätter speichern
20.02.2006 11:26:43
Worti
Hallo Heike,
der folgende Code speichert dir jedes Blatt als Datei mit dem Namen des Blattes im Verzeichnis D:\TEMP\ ab:


Sub BlattalsDateiSpeichern()
        
    Dim ws As Worksheet
    
    For Each ws In ActiveWorkbook.Worksheets
    
        ws.Copy
        ActiveWorkbook.SaveAs FileName:="D:\TEMP\" & ActiveSheet.Name & ".xls"
        ActiveWorkbook.Close
    Next ws
End Sub


Gruß Worti
Anzeige
AW: Arbeitsblätter speichern
20.02.2006 11:50:36
Heike
Hallo,
vielen Dank für die schnellen Antworten. es klappt alles super...
Danke für die Rückmeldung OT:-)
20.02.2006 13:04:36
Werner
;

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