Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Dutchi1972 vom 24.09.2022, 11:56 Options
Makro - einzelnes RegisterBlatt neu speichern unter neuen Namen
Hallo Coros,
Hallo auch alle anderen,
Hab heute wieder ein Problem wo ich nicht so ganz weiter komme.
Ich hab eine Datei "LICO", die mehrer Registerblätter hat , per Makro möchte ich eine bestimmtes Blatt "Kolli" in eine sep. Datei abspeichern, der Name stellt sich aus verschiedenen Infos zusammen, "KW_" + (Zelle I29) + "_NR_" + (Zelle D18) + "_" + (Zelle F7) + "_Kolli" .xls (Format).
Die Datei soll unter folgender Datei gespeichert werden \\Fileserver\alle\LICO\Neue\
Danke im voraus
Gruß Dutchi
Hallo auch alle anderen,
Hab heute wieder ein Problem wo ich nicht so ganz weiter komme.
Ich hab eine Datei "LICO", die mehrer Registerblätter hat , per Makro möchte ich eine bestimmtes Blatt "Kolli" in eine sep. Datei abspeichern, der Name stellt sich aus verschiedenen Infos zusammen, "KW_" + (Zelle I29) + "_NR_" + (Zelle D18) + "_" + (Zelle F7) + "_Kolli" .xls (Format).
Die Datei soll unter folgender Datei gespeichert werden \\Fileserver\alle\LICO\Neue\
Danke im voraus
Gruß Dutchi
Antwort 1 von Dutchi1972 vom 24.09.2022, 12:19 Options
Ich hab zwar einen Code (Infos sind etwas verkürzt) aus einem anderen Makro jedoch der speichert mir die ges. Datei mit allen Reg.Blättern.
Es soll aber nur das Blatt "Kolli" gespeichert werden.
ThisWorkbook.Sheet("Kolli").SaveAs "\\Fileserver\Alle\LICO\NEUE\" & "KW_"
Was muß ich verändern
Danke an alle
Es soll aber nur das Blatt "Kolli" gespeichert werden.
ThisWorkbook.Sheet("Kolli").SaveAs "\\Fileserver\Alle\LICO\NEUE\" & "KW_"
Was muß ich verändern
Danke an alle
Antwort 2 von Saarbauer vom 24.09.2022, 14:15 OptionsLösung
Hallo,
geht so wie du es möchtest nicht, könnte aber so funktionieren
Sheets("Kolli").Copy
ActiveWorkbook.SaveAs Filename:=""\\Fileserver\Alle\LICO\NEUE\" & "KW_" & I29 & "_NR_" & D18 & "_" & F7 & "_Kolli .xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close
ist so ungetestet, da ich die Pfade nicht nachbauen kann
Gruß
Helmut
geht so wie du es möchtest nicht, könnte aber so funktionieren
Sheets("Kolli").Copy
ActiveWorkbook.SaveAs Filename:=""\\Fileserver\Alle\LICO\NEUE\" & "KW_" & I29 & "_NR_" & D18 & "_" & F7 & "_Kolli .xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close
ist so ungetestet, da ich die Pfade nicht nachbauen kann
Gruß
Helmut
Antwort 3 von Dutchi1972 vom 25.09.2022, 23:49 Options
Danke Helmut,
Ich dein vorschlag auf meine Datei angepasst und ausprobiert,
Funktioniert super , ohne ruckeln,
Danke Gruß Wim
Ich dein vorschlag auf meine Datei angepasst und ausprobiert,
Funktioniert super , ohne ruckeln,
Danke Gruß Wim
Ähnliche Themen
Fehler beim Abbrechen des Speichern-Dialoges in Excel-Makro
Sdisno 19.07.2009 - 439 Hits - 7 Antworten
Excel Makro: Datei speichern unter anderem Namen, falls Name in Ordner schon vorhanden ist
Shermi 19.08.2009 - 921 Hits - 3 Antworten
per Makro Daten in andere Tabelle übernehmen und unter anderem Namen speichern
Petra65 28.08.2009 - 343 Hits - 9 Antworten
Tabellenblatt anhand von Makro speichern
afetinci 19.10.2009 - 153 Hits - 2 Antworten
Die neuen Browser: Was ist neu bei Safari 5?
irisg 07.09.2010 - 224 Hits -
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
