Макрос Excel для записи win. метаданные для экспортированного файла PDF, например Поле «Комментарии»

Question

У меня есть макрос Excel 2007, который создает счет в формате PDF. Сейчас я пытаюсь записать значение счета-фактуры в поле «Комментарии» (в метаданных файла), чтобы его можно было увидеть при просмотре папки «Счет-фактура» в проводнике.

Я смог записать значение в сам файл Excel с помощью

'save & close the spreadsheet
 ActiveWorkbook.BuiltinDocumentProperties("Comments").Value = "£" & Amount
 ActiveWorkbook.Close SaveChanges:=True

И я могу создать .pdf ОК, с помощью

'Create pdf. save it and display it on-screen - for user to print
 ActiveSheet.ExportAsFixedFormat _
             Type:=xlTypePDF, _
             Filename:=ThisFile, _
             Quality:=xlQualityStandard, _
             IncludeDocProperties:=True, _
             IgnorePrintAreas:=False, _
             OpenAfterPublish:=True

Но мне не удалось найти синтаксис для записи метаданных в .pdf

'Create pdf. save it and display on-screen:  for user to print/email
Amount = Range("J116").Value
ActiveWorkbook.BuiltinDocumentProperties("Comments").Value = "£" & Amount
ActiveSheet.ExportAsFixedFormat _
            Type:=xlTypePDF, _
            Filename:=ThisFile, _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, _
            OpenAfterPublish:=True

Как это может быть лучше / легче всего достичь?