| VBA-Beispiel 073 | |
|
|
mit VBA Dokumenteigenschaften auslesen |
|
| listet alle Dokumenteigenschaften der Exceldatei auf | |
|
Sub Dokumenteigenschaften() 'Dokumenteigenschaften auflisten Dim i As Long On Error Resume Next i = 1 For i = 1 To ThisWorkbook.BuiltinDocumentProperties.Count Cells(i, 1) = ThisWorkbook.BuiltinDocumentProperties(i).Name Cells(i, 2) = ThisWorkbook.BuiltinDocumentProperties(i).Value Next i Columns("A:B").AutoFit End Sub |
|
|
Download: vba073.zip |
|
relevante Links:
|
|
| |