VBA Как получить путь к папке данных приложения текущих пользователей?

Question

В общем

Используя VBA, как определить, где находится папка с данными приложения «Текущие пользователи»?

Специальные папки FileSystemObjects знают только о 3 папках

• WindowsFolder
• SystemFolder
• TemporaryFolder

В частности, мне нужен макрос Word для копирования файла в папку в папке Application Data.

например. В VB.Net я могу использовать My.Computer.FileSystem.SpecialDirectories.CurrentUserApplicationData, чтобы сделать это

Answer 1

Вы можете использовать Environ("AppData"), чтобы получить этот путь. Environ вытянет любую системную переменную, которую можно найти с помощью команды set в командной строке DOS.

Answer 2

Используя advapi32.dll, вы можете получить USERPROFILE через

Environ("USERPROFILE")

Соедините это с каталогом «Application Data» (который имеет стандартное, конкретное имя), чтобы получить то, что вы хотите

CStr(Environ("USERPROFILE") & "\Application Data")

Для получения дополнительной информации, проверьте MSDN