Objet FileDialog (Office)
Cet objet fournit une fonctionnalité de boîte de dialogue de fichier similaire à la fonctionnalité des boîtes de dialogue standard Ouvrir et Enregistrer qui existent dans les applications Microsoft Office.
Remarques
Utilisez la propriétéFileDialog à renvoyer un objet FileDialog. La propriété FileDialog se trouve dans chaque objet d’Application Office individuel. La propriété prend un seul argument, MsoFileDialogType, qui détermine le type d’objet FileDialog renvoyé par la propriété. Il existe quatre types d’objetFileDialog:
La boîte de dialogueOuvrir-permet aux utilisateurs de sélectionner un ou plusieurs fichiers que vous pouvez ensuite ouvrir dans l’application hôte à l’aide de la méthode Execute.
La boîte de dialogue Enregistrer sous-permet aux utilisateurs de sélectionner un seul fichier que vous pouvez ensuite enregistrer comme fichier en cours à l’aide de la méthode Execute.
La boîte de dialogueSélecteur de fichiers- permet aux utilisateurs de sélectionner un ou plusieurs fichier(s). Les chemins d’accès aux fichiers que l’utilisateur sélectionne sont capturés dans la collectionFileDialogSelectedItems.
La boîte de dialogueFolder Picker- permet aux utilisateurs de sélectionner un chemin d'accès. Le chemin d’accès aux fichiers que l’utilisateur sélectionne est capturé dans la collectionFileDialogSelectedItems.
Chaque application hôte peut uniquement créer une seule instance de l’objetFileDialog. Par conséquent, la plupart des propriétés de l’objetFileDialog sont conservées même lorsque vous créez plusieurs objetsFileDialog. Par conséquent, assurez-vous que vous définissez toutes les propriétés appropriée pour votre objectif avant d’afficher la boîte de dialogue.
Exemple
Pour afficher une boîte de dialogue fichier à l’aide l’objetFileDialog, vous devez utiliser la méthodeafficher. Une fois qu’une boîte de dialogue s’affiche, aucun code ne s’exécute jusqu'à ce que l’utilisateur fasse disparaître la boîte de dialogue. L’exemple suivant affiche une boîte de dialogue File Picker et affiche chaque fichier sélectionné dans une zone de message.
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
'Use the Show method to display the File Picker dialog box and return the user's action.
'The user pressed 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 "The path is: " & vrtSelectedItem
Next vrtSelectedItem
'The user pressed Cancel.
Else
End If
End With
'Set the object variable to Nothing.
Set fd = Nothing
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.