Private Sub CommandButton1_Click() With Application.FileDialog(msoFileDialogFolderPicker) .Title = "Select Input Folder" If .Show = -1 Then ' If the user selects a folder TextBox1.Value = ...
Returns a FileDialog object that represents a single instance of a file dialog box. Read-only. The msoFileDialogOpen and msoFileDialogSaveAs constants are not supported in Microsoft Access. Note that ...
Så vidt jeg kan forstå understøtter Outlook 2002 ikke FileDialog object. Eller måske metoden "Application.FileDialog(msoFileDialogFolderPicker)". (Win2000, Office 2002). Nedenstående kode (stort set ...