Jde to takhle:
With ActiveWorkbook
.BuiltinDocumentProperties("Author") = "Jeza"
.BuiltinDocumentProperties("Title") = "Jezovo"
.BuiltinDocumentProperties("Subject") = "Jeza says"
.BuiltinDocumentProperties("Manager") = "Jeza MBA"
.BuiltinDocumentProperties("Keywords") = "Jezovy slova"
.BuiltinDocumentProperties("Category") = "Jezovy kategorie"
.BuiltinDocumentProperties("Comments") = "Jezuv koment"
End With
Dalsi vlastnosti najdes v napovede VBE po zadani: BuiltinDocumentPropertiescitovat
With ActiveWorkbook
.BuiltinDocumentProperties("Author") = "Jeza"
.BuiltinDocumentProperties("Title") = "Jezovo"
.BuiltinDocumentProperties("Subject") = "Jeza says"
.BuiltinDocumentProperties("Manager") = "Jeza MBA"
.BuiltinDocumentProperties("Keywords") = "Jezovy slova"
.BuiltinDocumentProperties("Category") = "Jezovy kategorie"
.BuiltinDocumentProperties("Comments") = "Jezuv koment"
End With
Dalsi vlastnosti najdes v napovede VBE po zadani: BuiltinDocumentPropertiescitovat