GetOpenFilename的默认文件名

Question

我正在寻找在GetOpenFilename中设置默认文件名。我使用的是GetOpenFilename，因为它是使用UNC路径（我需要）的一个示例，根据我读到的内容，您无法使用ChDir或ChDrive使用FileDialog。是否有任何可以预设文件名并使用UNC路径的东西？

我试着将文件名粘贴到GetOpenFilename的FileFilter部分，这是行不通的。从我发现的情况来看，这看起来似乎不可能，但是我对VBA的了解有限，也可能是问题所在。

我一直坚持使用UNC，因为数据位于网络上，并非所有人都将其映射到同一个驱动器，甚至映射它。

Answer 1

在Excel中，如果你在Application.Dialogs()看，你会发现在Excel中使用预定义的对话框，您可以拨打时长的名单。 GetOpenFilename是相同的情况，因为它是预定义的，所以自定义选项是最小的。

使用通用文件对话框（即未在Excel中自定义），您可以使用Application.FileDialog(msoFileDialogOpen)，这将允许进一​​步定制包括初始文件名的文本。

Public Sub Sample() 
Dim Dlg As FileDialog 

Set Dlg = Application.FileDialog(msoFileDialogOpen) 
    Dlg.InitialFileName = "Sample" 
    Dlg.Show 
Set Dlg = Nothing 

End Sub