Цей короткий підручник покаже, як використовувати метод GetFileName для FileSystemObject.
Отримайте ім'я файлу за допомогою VBA FileSystemObject
У цьому уроці використовується FileSystemObject. Для того, щоб ним користуватися, вам потрібно встановити посилання на бібліотеку виконання сценарію VB. Дивіться тут для отримання додаткової інформації.
Щоб отримати назву файлу з будь -якого шляху, ви можете використовувати:
| 123456789101112 | Sub FSOGetFileName ()Dim FileName As StringЗатемнити FSO як новий FileSystemObjectВстановити FSO = CreateObject ("Scripting.FileSystemObject")«Отримайте ім’я файлуFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Отримати ім'я файлу без розширенняFileNameWOExt = Ліворуч (FileName, InStr (FileName, ".") - 1)End Sub |
Змінна FileName буде містити значення "ExampleFile.txt", змінна FileNameWOExt буде без розширення "ExampleFile".
Отримати ім'я файлу без розширення
Як зазначалося вище, для отримання імені файлу без розширення використовуйте цей рядок коду:
| 1 | FileNameWOExt = Ліворуч (FileName, InStr (FileName, ".") - 1) |
