В этом коротком руководстве будет показано, как использовать метод GetFileName объекта FileSystemObject.
Получить имя файла с помощью VBA FileSystemObject
В этом уроке используется FileSystemObject. Чтобы использовать его, вам нужно будет установить ссылку на библиотеку времени выполнения сценария VB. Смотрите здесь для получения дополнительной информации.
Чтобы получить имя файла по любому пути, вы можете использовать:
| 123456789101112 | Подложка FSOGetFileName ()Уменьшить имя файла как строкуDim FSO как новый объект FileSystemObjectУстановите FSO = CreateObject ("Scripting.FileSystemObject")'Получить имя файлаFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Получить имя файла без расширенияFileNameWOExt = Left (FileName, InStr (FileName, ".") - 1)Конец подписки |
Переменная FileName будет содержать значение «ExampleFile.txt», переменная FileNameWOExt будет без расширения «ExampleFile».
Получить имя файла без расширения
Как отмечалось выше, чтобы получить имя файла без расширения, используйте эту строку кода:
| 1 | FileNameWOExt = Left (FileName, InStr (FileName, ".") - 1) |
