Drucken von Arbeitsmappeneigenschaften (Microsoft Excel)
Wenn Sie eine Arbeitsmappe zusammenstellen, verfolgt Excel eine ganze Reihe von Informationen, die zusammen als Arbeitsmappeneigenschaften bezeichnet werden. Sie können die verschiedenen gepflegten Eigenschaften anzeigen, indem Sie das Dialogfeld Eigenschaften anzeigen.
In Word haben Sie die Möglichkeit, Dokumenteigenschaften zu drucken, wenn Sie dies wünschen.
Es gibt keine Möglichkeit, Arbeitsmappeneigenschaften in Excel zu drucken.
Stattdessen müssen Sie auf ein Makro zurückgreifen, das die Namen und Werte der Eigenschaften in ein Arbeitsblatt einfügt. Anschließend können Sie das Arbeitsblatt drucken und Ihre Arbeitsmappeneigenschaften im Hardcopy-Format verfügbar machen.
Das folgende Makro ist ein Beispiel für eine gute Möglichkeit, alle Arbeitsmappeneigenschaften in ein Arbeitsblatt zu kopieren, das gedruckt werden kann:
Public Sub WorksheetProperties() Dim p As DocumentProperty Dim iRow As Integer 'Built in Properties iRow = 1 Cells(iRow, 1).Value = "Built-in Properties" Cells(iRow, 1).Font.Bold = True iRow = iRow + 1 Worksheets(1).Activate For Each p In ActiveWorkbook.BuiltinDocumentProperties On Error Resume Next Cells(iRow, 2).Value = p.Name 'If no value then Excel causes an error so ignore! Cells(iRow, 3).Value = p.Value iRow = iRow + 1 Next On Error GoTo 0 'Custom Properties iRow = iRow + 1 Cells(iRow, 1).Value = "Custom Properties" Cells(iRow, 1).Font.Bold = True iRow = iRow + 1 For Each p In ActiveWorkbook.CustomDocumentProperties On Error Resume Next Cells(iRow, 2).Value = p.Name Cells(iRow, 3).Value = p.Value iRow = iRow + 1 Next On Error GoTo 0 End Sub
_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 (9149) gilt für Microsoft Excel 2007, 2010 und 2013. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier: