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 PierreHamburg vom 31.08.2020, 21:48 Options
Makro zum Speichern erstellen
Hallo!
Gibt es die Möglichkeit, ein Makro zu erstellen, dass eine Datei unter dem Namen einer bestimmten Zelle speichert?
Gruß
Pierre
Gibt es die Möglichkeit, ein Makro zu erstellen, dass eine Datei unter dem Namen einer bestimmten Zelle speichert?
Gruß
Pierre
Antwort 1 von Hajo_Zi vom 01.09.2020, 06:06 Options
Halo Pierre,
der Komplette Dateiname steht in der Zelle, einschl. Ordner
Sub Piere()
ThisWorkbook.SaveAs Range("A12")
End Sub
Gruß Hajo
der Komplette Dateiname steht in der Zelle, einschl. Ordner
Sub Piere()
ThisWorkbook.SaveAs Range("A12")
End Sub
Gruß Hajo
Antwort 2 von PierreHamburg vom 01.09.2020, 17:11 Options
Kannst Du mal ein Beispiel machen, wie das in der Zelle aussehen soll? Also wenn da Dateiname und Dateiordner gemeinsam drinstehen. (Der Ordner soll immer der gleiche sein.)
Wo muss ich diesen Befehl eingeben?
Wo muss ich diesen Befehl eingeben?
Antwort 3 von Hajo_Zi vom 01.09.2020, 18:47 Options
Hallo Pierre,
in der Zelle L:\Eigene Dateien\Hajo\Internet\Hajo.xls
Der Code gehört in ein Modul.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, rechte Maustaste, Einfügen Modul, Code ins rechte Fenster copieren, VBA Editor schließen. Start über Extras, Makro, Makros, Makro wählen, ausführen.
Gruß Hajo
in der Zelle L:\Eigene Dateien\Hajo\Internet\Hajo.xls
Der Code gehört in ein Modul.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, rechte Maustaste, Einfügen Modul, Code ins rechte Fenster copieren, VBA Editor schließen. Start über Extras, Makro, Makros, Makro wählen, ausführen.
Gruß Hajo
Antwort 4 von PierreHamburg vom 01.09.2020, 22:15 Options
Hallo Hajo!
Danke für Deine Mühe.
Meine Kenntnisse in Visual Basic sind minimal. Von daher kann ich das nicht ganz umsetzen.
Welchen Code gebe ich in das Fenster ein? Den aus Deiner ersten Antwort?
Sub Piere()
ThisWorkbook.SaveAs Range("A12")
End Sub
Und welcher Name muss dann hinter Sub stehen? Der Name der Excel-Datei?
Sorry, aber wie Du siehst habe ich keinen blassen Schimmer.
Trotzdem vielen Dank!
Pierre
Danke für Deine Mühe.
Meine Kenntnisse in Visual Basic sind minimal. Von daher kann ich das nicht ganz umsetzen.
Welchen Code gebe ich in das Fenster ein? Den aus Deiner ersten Antwort?
Sub Piere()
ThisWorkbook.SaveAs Range("A12")
End Sub
Und welcher Name muss dann hinter Sub stehen? Der Name der Excel-Datei?
Sorry, aber wie Du siehst habe ich keinen blassen Schimmer.
Trotzdem vielen Dank!
Pierre
Antwort 5 von Hajo_Zi vom 02.09.2020, 05:58 Options
Hallo Pterre,
ja, einen anderen habe ich nicht gpostet.
Den Namen kannst Du frei wählen, nur er muss mit einem Buchstaben beginen und keine Leerstellen und Sonderzeichen.
Gruß Hajo
ja, einen anderen habe ich nicht gpostet.
Den Namen kannst Du frei wählen, nur er muss mit einem Buchstaben beginen und keine Leerstellen und Sonderzeichen.
Gruß Hajo
Antwort 6 von PierreHamburg vom 02.09.2020, 18:55 Options
Super. Das mit dem Makro-erstellen hat funktioniert.
Problem: Ich möchte in die Zelle wirklich nur einen Namen eingeben, unter dem die Datei gespeichert werden soll. Den Platz in dem Ordner soll er automatisch zuordnen.
Wäre sowas möglich?
Problem: Ich möchte in die Zelle wirklich nur einen Namen eingeben, unter dem die Datei gespeichert werden soll. Den Platz in dem Ordner soll er automatisch zuordnen.
Wäre sowas möglich?
Antwort 7 von Hajo_Zi vom 02.09.2020, 19:32 Options
Hallo Pierre,
wodurch soll das automatisch zugeordnet werden? Ein fester Ordner?
ThisWorkbook.SaveAs "c:\Eigene Dateien\" & Range("A12")
Gruß Hajo
wodurch soll das automatisch zugeordnet werden? Ein fester Ordner?
ThisWorkbook.SaveAs "c:\Eigene Dateien\" & Range("A12")
Gruß Hajo
Antwort 8 von PierreHamburg vom 02.09.2020, 21:06 Options
Ja, super!
Das Problem ist: Meine Kollegen sollen mit der Tabelle arbeiten. Wir arbeiten hier aber auf einer Pflegestation in einem Krankenhaus. Da kann man sich vorstellen, dass viele Kollegen mit Computern am liebsten überhaupt nichts zu tun haben wollen. Und da wird das Abspeichern in einem bestimmten Ordner bei all dem Ordner-Wirr-Warr (zumindest für die Kollegen) zu einer unüberwindbaren Hürde.
So wird es viel einfacher!
Vielen Dank!!!
Pierre
Das Problem ist: Meine Kollegen sollen mit der Tabelle arbeiten. Wir arbeiten hier aber auf einer Pflegestation in einem Krankenhaus. Da kann man sich vorstellen, dass viele Kollegen mit Computern am liebsten überhaupt nichts zu tun haben wollen. Und da wird das Abspeichern in einem bestimmten Ordner bei all dem Ordner-Wirr-Warr (zumindest für die Kollegen) zu einer unüberwindbaren Hürde.
So wird es viel einfacher!
Vielen Dank!!!
Pierre
Ähnliche Themen
"Einfügen" als Makro erstellen
PierreHamburg 29.07.2007 - 71 Hits - 2 Antworten
Makro speichern
sonja23 29.07.2007 - 63 Hits - 14 Antworten
Speichern unter mit Makro und Zellbezügen(verknüpfen)
FrederikS. 27.02.2008 - 58 Hits - 1 Antwort
Fehler beim Abbrechen vom automatischen Speichern bei Makro
pnp 11.04.2008 - 21 Hits - 5 Antworten
Per Makro Speichern unter aktuellen Datum!
RAMIREZ-003 21.08.2008 - 32 Hits - 5 Antworten
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
