Свойство FileDialog.InitialFileName (Office)

Статья
04/07/2023

Устанавливает или возвращает строку, представляющую путь или имя файла, которое изначально отображается в диалоговом окне файлов. Для чтения и записи.

Синтаксис

выражение.InitialFileName

выражение: переменная, представляющая объект FileDialog.

Замечания

* Используйте подстановочные знаки и ? при указании имени файла, но не при указании пути. Символ * представляет любое количество последовательных знаков, а ? представляет один знак. Например, .InitialFileName = "c:\c*s.txt" возвращает как "charts.txt", так и "checkregister.txt".

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

Если указывается файл, существующий в исходной папке, в диалоговом окне отображается только этот файл.

Если указывается имя файла, не существующее в исходной папке, в диалоговом окне файлы не отображаются. Тип файла, указываемый в свойстве InitialFileName переопределяет настройки фильтра файлов.

Если указывается недопустимый путь, применяется последний использованный путь. Сообщение предупредит пользователей при использовании недопустимого пути.

Установка для этого свойства строки длиной более 256 знаков вызывает ошибку времени выполнения.

Пример

В приведенном ниже примере выводится диалоговое окно средства выбора файлов с помощью объекта FileDialog и отображаются все выбранные файлы в окне сообщения.

Sub Main() 
 
 'Declare a variable as a FileDialog object 
 Dim fd As FileDialog 
 
 'Create a FileDialog object as a File Picker dialog box. 
 Set fd = Application.FileDialog(msoFileDialogFilePicker) 
 
 'Declare a variable to contain the path 
 'of each selected item. Even though the path is aString, 
 'the variable must be a Variant because For Each...Next 
 'routines only work with Variants and Objects. 
 Dim vrtSelectedItem As Variant 
 
 'Use a With...End With block to reference the FileDialog object. 
 With fd 
 
 'Set the initial path to the C:\ drive. 
 .InitialFileName = "C:\" 
 
 'Use the Show method to display the File Picker dialog box and return the user's action. 
 'If the user presses the button... 
 If .Show = -1 Then 
 
 'Step through each string in the FileDialogSelectedItems collection. 
 For Each vrtSelectedItem In .SelectedItems 
 
 'vrtSelectedItem is aString that contains the path of each selected item. 
 'Use any file I/O functions that you want to work with this path. 
 'This example displays the path in a message box. 
 MsgBox "Selected item's path: " & vrtSelectedItem 
 
 Next vrtSelectedItem 
 'If the user presses Cancel... 
 Else 
 End If 
 End With 
 
 'Set the object variable to Nothing. 
 Set fd = Nothing 
 
End Sub

См. также

Элементы объекта FileDialog

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через