Méthode Application.GetOpenFilename (Excel)
Affiche la boîte de dialogue Ouvrir standard, et obtient un nom de fichier de l'utilisateur sans réellement ouvrir aucun fichier.
Syntaxe
expression.GetOpenFilename (FileFilter, FilterIndex, Titre, ButtonText, MultiSelect)
expressionUne variable qui représente un objetApplication.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| FileFilter | Facultatif | Variant | Chaîne spécifiant les critères de filtrage des fichiers. |
| FilterIndex | Facultatif | Variant | Spécifie les numéros d'index des critères de filtrage des fichiers par défaut, de 1 au nombre de filtres défini dans FileFilter. Si cet argument est omis ou si la valeur est supérieure au nombre de filtres présents, le premier filtre de fichiers est utilisé. |
| Titre | Facultatif | Variant | Spécifie le titre du nouveau site. Si cet argument est omis, le titre est « Ouvrir ». |
| ButtonText | Facultatif | Variant | Macintosh uniquement. |
| MultiSelect | Facultatif | Variant | True pour autoriser plusieurs noms de fichiers. Faux pour n'autoriser qu’un seul nom de fichier impérativement être sélectionnées. La valeur par défaut est False. |
Valeur renvoyée
Variant
Remarques
Cette chaîne transmise dans l'argument FileFilter se compose de paires de chaînes de filtrage des fichiers, suivies de la spécification de filtre de fichiers par caractère générique MS-DOS, les différentes parties et paires étant séparées par des virgules. Chaque paire est répertoriée dans la zone de liste déroulante Type de fichiers. Par exemple, la chaîne suivante spécifie deux filtres de fichiers : texte et addin :
"Text Files (*.txt), *.txt,Add-In Files (*.xla), *.xla"
Pour utiliser plusieurs expressions contenant des caractères génériques MS-DOS pour un seul type de filtre de fichiers, séparez les expressions à l’aide de point-virgules, par exemple, "Visual Basic Files (*.bas; *.txt), *.bas;*.txt".
Si l’argument FileFilter n’est pas défini, il prend la valeur par défaut "All Files (*.*), *.*".
Cette méthode renvoie le nom de fichier sélectionné ou le nom entré par l’utilisateur. Le nom renvoyé peut inclure une spécification du chemin d’accès. Si MultiSelect est True, la valeur renvoyée est une matrice de noms des fichier sélectionnés (même si le nom d’un seul fichier est sélectionné). Renvoie False si l’utilisateur annule la boîte de dialogue.
Cette méthode peut changer le lecteur en cours ou le dossier.
Exemple
Cet exemple affiche la boîte de dialogue Ouvrir, avec le filtre de fichiers défini sur les fichiers texte. Si l’utilisateur choisit un nom de fichier, le code affiche ce nom de fichier dans une boîte de message.
fileToOpen = Application _
.GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen <> False Then
MsgBox "Open " & fileToOpen
End If
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.