Отобразить свойства книги - PullRequest
0 голосов
/ 27 марта 2019

Я пытаюсь создать шаблон документа, который всегда отображает свойства рабочей книги, определенные при этом, в ячейке.

Например: я могу захотеть, чтобы путь к файлу заканчивался с именем файла и расширением файла (.xls, .xlsx или .xlsm), или я мог бы просто захотеть отобразить заголовок книги без NO FILE PATHИ НЕТ РАСШИРЕНИЯ ФАЙЛА.

=MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND("]",CELL("filename",A1))-FIND("[",CELL("filename",A1))-1)

, но это приносит расширение с ним.Я не хочу этого.

Function Name()
Name = ActiveWorkbook.BuiltinDocumentProperties.("Title")
End Function

Затем я набираю = Name () в ячейку, я хочу, чтобы имя файла отображалось.Но все, что я получаю, это большой жирный "0".

Аналогичный код работает при вставке "Last Author" для "Title".

См. Выше

...