Wenn Sie mit vielen gleichzeitig geöffneten Arbeitsmappen arbeiten, wissen Sie, dass es schwierig sein kann, die einzelnen geöffneten Arbeitsmappen nacheinander zu speichern. Wäre es nicht großartig, einen einzigen Befehl zu haben, mit dem Sie alle geöffneten Arbeitsmappen speichern können, ohne dies manuell tun zu müssen?

Leider gibt es in den Excel-Versionen, die die Multifunktionsleistenschnittstelle verwenden, keinen solchen Befehl, aber Sie können einen Befehl mithilfe eines Makros erstellen. Das Folgende ist ein gutes Beispiel für eines, das Sie verwenden könnten:

Sub SaveAll()

Dim Wkb As Workbook     For Each Wkb In Workbooks         If Not Wkb.ReadOnly And Windows(Wkb.Name).Visible Then             Wkb.Save         End If     Next End Sub

Speichern Sie das Makro in Ihrer persönlichen Arbeitsmappe, weisen Sie es der Symbolleiste für den Schnellzugriff oder einer Tastenkombination zu, und Sie können es beliebig oft aufrufen.

Es werden alle geöffneten Arbeitsmappen gespeichert, mit Ausnahme derjenigen, die schreibgeschützt oder ausgeblendet sind.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (11079) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier: