{"id":3033,"date":"2015-01-17T07:25:02","date_gmt":"2015-01-17T05:25:02","guid":{"rendered":"http:\/\/www.ramses.de\/?p=3033"},"modified":"2015-01-17T07:25:02","modified_gmt":"2015-01-17T05:25:02","slug":"faq-excel-speicherung-von-dateien","status":"publish","type":"post","link":"https:\/\/www.ramses.de\/?p=3033","title":{"rendered":"FAQ Excel &#8211; Speicherung von Dateien"},"content":{"rendered":"<h2><strong>Problem <\/strong><\/h2>\n<p>Wenn Sie die Umschalt-Taste dr\u00fccken und dann das Men\u00fc Datei anw\u00e4hlen, stellt Excel bekanntlich den Befehl Alle schlie\u00dfen zur Verf\u00fcgung. H\u00e4ufig m\u00f6chten Sie die ge\u00f6ffneten Arbeitsmappen aber nicht schlie\u00dfen, sondern in einem Arbeitsgang speichern. Leider bietet Excel aber von Haus aus nur das gleichzeitige Schlie\u00dfen aller ge\u00f6ffneten Dateien an. Wenn Sie alle Arbeitsmappen &#8222;in einem Rutsch&#8220; speichern wollen, ohne sie zu schlie\u00dfen, m\u00fcssen Sie mit einem VBA-Makro nachhelfen.<\/p>\n<h2><strong>L\u00f6sung <\/strong><\/h2>\n<p>Wechseln Sie also mit Alt+F11 in den Visual Basic-Editor und richten Sie mit dem Befehl Einf\u00fcgen-Modul ein neues Codefenster ein. Geben Sie folgende Prozedur ein:<\/p>\n<pre>Public Sub AllesSpeichern()\r\nDim objMappe As Workbook\r\nFor Each objMappe In Application.Workbooks\r\nIf objMappe.Path &lt;&gt; \"\" Then\r\nobjMappe.Save\r\nElse\r\nobjMappe.Activate\r\nApplication.Dialogs(_\r\nxlDialogSaveAs).Show (objMappe.Name)\r\nEnd If\r\nNext objMappe\r\nMsgBox \"Speichervorgang beendet!\"\r\nEnd Sub<\/pre>\n<p>Die For-Schleife durchl\u00e4uft alle ge\u00f6ffneten Arbeitsmappen, wobei sie pr\u00fcft, ob die aktuelle Mappe bereits eine Pfadangabe besitzt. Wenn das der Fall ist, wird die Datei gespeichert. Sollte keine Pfadangabe vorhanden sein, bedeutet das, dass es sich um eine neue, bislang noch nicht gespeicherte Arbeitsmappe handelt. Unter dieser Voraussetzung zeigt die Prozedur das eingebaute Dialogfeld Speichern unter an. So haben Sie Gelegenheit, die Datei unter einem Namen Ihrer Wahl zu speichern. Falls Sie im Dialogfeld auf Abbrechen klicken, wird die Datei nat\u00fcrlich nicht gespeichert! Sobald alle Dateien abgearbeitet sind, weist Sie ein Meldungsfenster auf das Ende des Speichervorgangs hin.<\/p>\n<p>Aus Excel rufen Sie die Prozedur \u00fcber das Dialogfeld Makro auf, das Sie am schnellsten mit der Tastenkombination Alt+F8 \u00f6ffnen. Das Makro &#8222;AllesSpeichern&#8220; steht so lange zur Verf\u00fcgung, wie die Datei mit dem Makrocode ge\u00f6ffnet ist.<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Problem Wenn Sie die Umschalt-Taste dr\u00fccken und dann das Men\u00fc Datei anw\u00e4hlen, stellt Excel bekanntlich den Befehl Alle schlie\u00dfen zur Verf\u00fcgung. H\u00e4ufig m\u00f6chten Sie die &#8230; <a title=\"FAQ Excel &#8211; Speicherung von Dateien\" class=\"read-more\" href=\"https:\/\/www.ramses.de\/?p=3033\" aria-label=\"Mehr Informationen \u00fcber FAQ Excel &#8211; Speicherung von Dateien\">Weiterlesen &#8230;<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[59],"tags":[60,61],"class_list":["post-3033","post","type-post","status-publish","format-standard","hentry","category-excel","tag-excel-2010","tag-vba"],"_links":{"self":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3033","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3033"}],"version-history":[{"count":1,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3033\/revisions"}],"predecessor-version":[{"id":3034,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3033\/revisions\/3034"}],"wp:attachment":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3033"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3033"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3033"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}