Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1816to1820
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
1816to1820
1816to1820
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

speichern einzelner Arbeitsblätter

speichern einzelner Arbeitsblätter
03.03.2021 08:18:10
Housten26
Hallo Excel-Profis,
ich möchte aus einer vorhandenen Arbeitsmappe, bestehend aus 4 Arbeitsblättern, das 2. und 3. Arbeitsblatt unter einem festgelegten Pfad abspeichern.
Der Dateinname der abgespeicherten Arbeitsblätter soll aus 2 verschiedenen Zellinhalten zusammengesetzt sein, die sich in dem ersten Arbeitsblatt befinden, welches nicht mit gespeichert werden soll. Bsp. Zellinhalt ("A1") = 2854 und ("A2") = XYZ soll werden zu: 2854_XYZ.
Kann mr bitte dabei jemand helfen?

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: speichern einzelner Arbeitsblätter
03.03.2021 09:19:38
Nepumuk
Hallo,
teste mal:
Option Explicit

Public Sub Speichern()
    Dim strFileName As String
    With Worksheets("Tabelle1") 'Tabellennamen Anpassen !!!
        strFileName = "H:\210303\" & .Range("A1").Text & "_" & .Range("A2").Text & ".xlsx" 'Pfad und Tabellennamen Anpassen !!!
    End With
    Call Worksheets(Array("Tabelle2", "Tabelle3")).Copy 'Tabellennamen Anpassen !!!
    Call ActiveWorkbook.SaveAs(Filename:=strFileName, FileFormat:=xlOpenXMLWorkbook)
    Call ActiveWorkbook.Close
End Sub

Gruß
Nepumuk

Anzeige
AW: speichern einzelner Arbeitsblätter
03.03.2021 13:47:24
Housten26
Hallo Nepumuk,
vielen Dank für den Code. Es funktioniert super!
Nur die Meldung das VB Projekt-Features nicht in Arbeitsmappen ohne Makros gespeichert werden können nervt noch ein wenig.

AW: speichern einzelner Arbeitsblätter
03.03.2021 13:53:21
Nepumuk
Hallo,
soll die Meldung abgeschaltet oder die Makros mit gespeichert werden?
Gruß
Nepumuk

AW: speichern einzelner Arbeitsblätter
03.03.2021 14:05:11
Housten26
Hallo,
die Abschaltung der Meldung wäre besser.

AW: speichern einzelner Arbeitsblätter
03.03.2021 14:09:39
Nepumuk
Hallo,
so:
    Application.DisplayAlerts = False
Call ActiveWorkbook.SaveAs(Filename:=strFileName, FileFormat:=xlOpenXMLWorkbook)
Application.DisplayAlerts = True

Gruß
Nepumuk

Anzeige
AW: speichern einzelner Arbeitsblätter
03.03.2021 14:30:59
Housten26
Hallo,
Perfekt! Es klappt super.
Absolutes Forum hier - alle Daumen hocht!
Vielen Dank nochmal für die schnelle und professionelle Hilfe.
VG

VBA Calling
03.03.2021 14:18:28
Daniel
Hallo Nepumuk
mal rein aus Interesse eine Frage:
gibt es einen bestimmten Grund, warum du hier jeden Befehl "callst"?
Notwendig ist das ja nicht, oder übersehe ich was?
ich persönlich mache es bisher so, dass ich nur selbst geschriebene Unterprozeduren mit CALL aufrufe und alle originären VBA-Befehle direkt.
Damit sehe ich beim späteren Lesen gleich: Achtung hier arbeitet was selbstgeschriebenes
Gruß Daniel

Anzeige
AW: VBA Calling
03.03.2021 14:31:23
Nepumuk
Hallo Daniel,
ich rufe alle Sub's mit Call auf. Das habe ich mir bei der Klassenprogrammierung angewöhnt.
Gruß
Nepumuk

AW: VBA Calling
03.03.2021 15:26:14
Daniel
muss man das da machen?
gruß Daniel

AW: VBA Calling
03.03.2021 15:29:37
Nepumuk
Hallo Daniel,
nein, aber ich sehe sofort ob es sich um eine Property oder eine Procedure handelt. Das erleichtert das lesen von Codes ungemein. Meine Meinung.
Gruß
Nepumuk

304 Forumthreads zu ähnlichen Themen

Tabellenblatt unter Blattnamen speichern
Jakob

Hallo,
ich möchte ein einzelnes Tabellenblatt unter den Blattnamen und den Wert aus der Zelle B11 im Tabellenblatt "Eingabe" abspeichern. Die Zelle B11 habe ich mit einen Namen (Lieferung) definiert.
Wie muß der VBA-Code dafür aussehen?
Vielen Dank schon mal für Eure Hilfe.
Gruß...
23.09.2008 17:08:00
Thread-ID: 1011833
4 Beiträge
Anzeige
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
Kopiertes Tabellenblatt aus Vorlage speichern
Bertram

Hallo zusammen,
ich bekomme seit Neuestem beim Speichern einer Datei (mittels VBA) manchmal eine Fehlermeldung. Ich habe zwar schon im Archiv gesucht, aber nix gefunden. Wahrscheinlich liegt's an meinen Suchbegriffen, denn ich hab die Fehlermeldung noch nie vorher gesehen und weiß nicht, wi...
05.03.2009 12:20:42
Thread-ID: 1056776
11 Beiträge
Anzeige
Nur Tabellenblatt speichern nicht ganze Arbeitsm
Horst

Hey !
Da eine meiner Arbeitsmappe immer mehr Arbeitsblätter (Tabellen) bekommt. Möchte ich diese irgendwie ausgliedern und nur bei bedarf wieder reinladen.
Kann ich das irgend wie per Marko oder zu Fuß erledigen?
Das heißt unter ihrem Namen ablegen. Und irgendwie (per extra Menüpunk...
19.03.2009 11:41:16
Thread-ID: 1061772
10 Beiträge
Tabellenblatt Kopieren, mit anderem Name speichern
Mandy

Hi,
Hoffe mal wieder auf Eure Hilfe: Wie kann ich denn per Makro in meiner XLS das Sheet "Ablage" kopieren und im gleichen sheet unter dem Name "Data" wieder einfügen ?
Danke
mandy
24.03.2009 14:35:27
Thread-ID: 1063343
3 Beiträge
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
Automatisch berechnen nur in einem Tabellenblatt
Gerrit

Moin,
habe das automatische berechnen gernerell ausgeschaltet, jedoch bei einem Tabellenblatt brauche ist es.
Gibt's hier ne Möglichkeit?
Vielen Dank!
Gerrit
20.06.2009 23:56:05
Thread-ID: 1083169
22 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

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
3
5
13
10
2
9
2
7
21
5
7
13
2
4
3
5
4
5
7
6
12
3
12
8
2