Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 14:45:54
Verknüpfung Tabelleneinträge mit Datumsspalte
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1936to1940
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
1936to1940
1936to1940
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA SaveCopyAs

VBA SaveCopyAs
01.08.2023 22:53:50
PeTeR
Hallo VBA-Profis,
ich brauche bitte mal wieder eure Hilfe:
1) Ich habe eine Datei "Original.xlsB"
2) Das Makro in der Datei "Original.xlsB" soll nun eine Kopie der Datei erstellen: "Kopie.xlsX" und in dieser Kopie arbeiten, so dass eben nur in der Kopie gearbeitet wird, aber keinesfalls im Original.
Beim SaveCopyAs kann man kein neues Dateiformat angeben, ausserdem ist die Kopie danach nicht geöffnet :-(
Vielen Dank für eure Unterstützung!
VG
PeTeR

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
VBA SaveCopyAs
02.08.2023 16:50:02
daniel
Hi
SaveCopyAs speichert immer eine 1:1-Kopie der Datei, dh. du kannst das Dateiformat nicht ändern.

speichere einfach die Datei mit SaveAs "neuerdateiname ohne Endung", Dateiformat
damit hast du die Datei nicht nur auch als Kopie zum Original gespeichert, sondern du befindest sich auch schon sofort in dieser Kopie und arbeitest in dieser.
Das normale SaveAs macht eigentlich genau das was deiner Beschreibung nach willst.
(Komplizierter wirds, wenn man eine Datei als Kopie in einem anderen Dateiformat speichern will, aber dann im Original weiterarbeiten möchte)
Einziger Problempunkt: die Makros sind vorerst weiterhin gültig, die werden nur in der gespeicherten Datei gelöscht, nicht aber in der Version im Speicher.
Dh erst beim Wiederöffnen einer xlsx wird das Löschen der Makros wirksam.

Um das Überschreiben der Originaldatei zu verhindern, würde ich für diese über den Dateiexplorer den Schreibschutz setzen.
Das ist einfach nur ein Häkchen in den Dateieigenschaften, das gesetzt werden kann. Es hat zwar keinen Passwortschutz, aber Zugang schützt in der Regel ausreichend vor unabsichtlicher Änderung.

Gruß Daniel
Anzeige
VBA SaveCopyAs
02.08.2023 07:53:25
Peter Trawinski
Ist was du suchst nicht einfach "Save as"? Speichert unter neuem Namen, ggf. anderes Format, schließt das Original und befindet sich in der Kopie!?
VBA SaveCopyAs
02.08.2023 16:35:16
onur
UND: Es wäre nicht wirklich eine Kopie, da ohne Makros.
" Das Makro .... soll nun eine Kopie der Datei erstellen .... und in dieser Kopie arbeiten" - DAS geht nur, wenn beide Versionen der Datei geöffnet sind. Wenn die xlsb geschlossen wird, hört das Makro logischerweise auf, zu arbeiten.
Es geht nur so:
Kopie speichern
Kopie öffnen (und aktivieren)
Makro ab da so umschreiben, daß alle Dateizugriffe sich nur noch auf "ActiveWorkbook" beziehen.
Deswegen fragte ich ja auch, was er mit "weiterarbeiten" meint....
Wenn er aber meint, dass die xlsb-Datei geschlossen wird und das Makro in der xlsx weiterarbeiten soll, kann er es vergessen, da ja xlsx keine Makros haben.
Anzeige
VBA SaveCopyAs
02.08.2023 16:13:47
Oberschlumpf
DA hätten WIR auch drauf kommen können!

PeTeR sucht ne Lösung mit SaveCopyAs

Aber eine KOPIE! kann nicht im anderen Format gespeichert werden - is ja ne Kopie!

Der andere Peter hat natürlich recht mit "Save As" ! nur er hat recht, sonst niemand hier.
AW: VBA SaveCopyAs
01.08.2023 23:03:50
onur
"Beim SaveCopyAs kann man kein neues Dateiformat angeben" ?
Wer hat dir das denn erzählt?
"so dass eben nur in der Kopie gearbeitet wird" ?
Was genau soll das heissen?
VBA SaveCopyAs
02.08.2023 08:55:42
PeTeR
Hallo Onur,
das erzählt mir die MS-Hilfe und diverse Foren. SaveCopyAs hat nur einen Parameter: Filename
Aber du kannst mir gerne den Befehl posten: SaveCopyAs MIT Fileformat
Anzeige
VBA SaveCopyAs
02.08.2023 10:19:12
onur
Aber meine zweite Frage hast du noch nicht beantwortet...
VBA SaveCopyAs
02.08.2023 09:56:56
onur
FILENAME kann jede beliebige Endung haben - xlsb, xlsm oder xlsx.
VBA SaveCopyAs
02.08.2023 10:12:18
onur
Korrektur: Hast Recht, Excel speichert dann zwar, aber kann sie evtl nicht mehr öffnen.
Sorry, aber im Prinzip hatte ich auch Recht..... :))
VBA SaveCopyAs
02.08.2023 01:53:16
Oberschlumpf
Hi,

Ich vermute: "Was genau soll das heissen?" = zuvor gespeicherte xlsX-Datei öffnen, Original-xlsB schließen

Ciao
Thorsten
VBA SaveCopyAs
02.08.2023 02:16:36
onur
Und das Makro springt von der xlsb zur xlsx-Datei und macht von da aus weiter ???
VBA SaveCopyAs
02.08.2023 02:48:38
Oberschlumpf
dann eben nur xlsB schließen (bevor du es vllt tust: frag nich mich, ob der Fragende das mit VBA gut nich selbst + allein hinbekommt, sondern frag ihn direkt)
Anzeige

308 Forumthreads zu ähnlichen Themen

ActiveWorkbook.SaveAs
Larissa

Hallo,
jetzt habe ich doch noch eine Frage.
In meinem Makro habe ich die Funktion: ActiveWorkbook.SaveAs 'Name_Datum'
Die Datei wird dann in Eigene Dateien abgespeichert. Wenn an diesem Platz schon eine Datei mit diesem Namen vorliegt, kommt die typische Abfrage, ob die Datei übers...
12.09.2009 17:32:49
Thread-ID: 1102264
3 Beiträge
Anzeige
Save As Methode fehlgeschlagen VBA
andreas

Hallo zusammen,
habe hier einen kleinen Code zum Speichern der Tabelle. Funktioniert auch solange noch keine Datei mit gleichem Namen vorhanden ist.
Ist diese vorhanden kommt ja die Abfrage vorhandene überschreiben ja oder nein. Bei ja wird problemlos überschrieben, aber bei nein kommt...
28.05.2010 14:53:21
Thread-ID: 1159296
4 Beiträge
SaveAs über VBA macht bei BeforeSave Probleme
norman

Hallo alle,
ich habe ein wirklich kniffeliges Problem, das bereits hier mal angegangen wurde (https://www.herber.de/forum/archiv/1144to1148/t1147360.htm und https://www.herber.de/forum/archiv/1144to1148/t1145651.htm, vielen Dank an dieser Stelle an Tino, entschuldige bitte, dass ich damals...
23.07.2010 17:21:36
Thread-ID: 1168218
11 Beiträge
Anzeige
VBA _pivate_sub save as
Volker

Hallo,
ich habe ein Problem beim Speichern einer Excel Datei. Habe ein Makro im Internet gefunden, dieses eingebaut, funktioniert wunderbar ABER jetzt wird bei jedem speichern das Dialogfeld "Save as" aufgemacht.
ISt es möglich hier eine Abfrage einzubauen, welche prüft ob der Dateinam...
25.04.2012 07:38:29
Thread-ID: 1260797
4 Beiträge
Ausschreiben von Dateien per VBA SaveAs
Dateien

Guten Morgen,
Hab ein kleines Problem und hab mich schon den ganzen Morgen durchs Internet geschlagen und auch viel hier gefunden, aber irgendwie wills bei mir nicht funktionieren ...
Hab mir hier zur Auswertung von Messdaten n kleinen Excel Tabellensatz erschaffen damit ich die Inputfi...
25.05.2012 11:57:01
Thread-ID: 1264893
5 Beiträge
activesheet.saveas txt
Günter

Hallo,
kämpfe mich als Neuling durch VBA.
Ich habe ein xls-Arbeitsblatt mit x Zeilen.
Möchte nun jeweils 5 Zeilen als txt speichern.
Habe dazu folgenden code erstellt
Range("A2:A6").Select
Selection.Copy
Sheets("Tabelle2").Select
ActiveSheet.Paste
Application...
04.08.2013 11:32:56
Thread-ID: 1325650
4 Beiträge
VBA Outlook 2010 Fehler (xlDialogSaveAs).Show
Thorsten

Hallo,
ich versuche eMail-Anhänge zu speichern.
Der genaue Speicherpfad steht in den Anhängen(.xls) der eMail.
Leider ist der Name/ Bezeichnung immer anders.
Die Anhänge werden temporär gespeichert, geöffnet und dann kommt mein Problem:
der Benutzer soll das Speicherverzeich...
07.06.2014 07:21:41
Thread-ID: 1365046
4 Beiträge
ThisWorkbook.SaveAs = Excel Absturz !? - PLS Help
Thorben

Hallo alle zusammen,
folgender Code legt eine Kopie ab und bringt Excel dann zum Absturz!?
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Filestring1 = "\Test1.xlsm" Filestring2 = "\Test2.xlsm" If ActiveSheet.Range("G1") = "Bestand 1" = True Then ThisWor...
23.06.2014 14:57:24
Thread-ID: 1367056
6 Beiträge

Links zu Excel-Dialogen

Frame

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