Méthode Application.GetOpenFilename (Excel)

Affiche la boîte de dialogue Enregistrer sous standard et obtient un nom de fichier de l’utilisateur sans enregistrer réellement les fichiers.

Syntaxe

expression.GetSaveAsFilename (InitialFilename, FileFilter, FilterIndex, Titre, ButtonText)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
InitialFilename	Facultatif	Variant	Spécifie le nom de fichier suggéré. Si cet argument est omis, Microsoft Excel utilise le nom du classeur actif.
FileFilter	Facultatif	Variant	Chaîne spécifiant les critères de filtrage des fichiers. La longueur maximale est de 255 caractères, sans quoi la méthode renvoie Erreur 2015.
FilterIndex	Facultatif	Variant	Spécifie le numéro d’index des critères de filtrage de fichiers par défaut, de 1 au nombre de filtres spécifiés dans FileFilter. Si cet argument est omis ou si la valeur est supérieure au nombre de filtres présents, le premier filtre de fichier est utilisé.
Titre	Facultatif	Variant	Spécifie le titre du nouveau site. Si cet argument est omis, le titre par défaut est utilisé.
ButtonText	Facultatif	Variant	Macintosh uniquement.

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".

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. Renvoie False si l’utilisateur annule la boîte de dialogue.

Cette méthode peut changer le lecteur en cours ou le dossier.

Lorsque InitialFilename est utilisé avec une extension et qu’un filtre est appliqué, cette extension doit correspondre à l’extension du filtre, sans quoi l’InitialFilename d’effectivité qui s’affiche dans la boîte de dialogue sera une chaîne vide.

Exemple

Cet exemple permet d’afficher la boîte de dialogue Enregistrer sous, avec le filtre de fichier défini sur Fichiers texte. Si l’utilisateur choisit un nom de fichier, le code affiche ce nom de fichier dans une boîte de message.

fileSaveName = Application.GetSaveAsFilename( _ 
 fileFilter:="Text Files (*.txt), *.txt") 
If fileSaveName <> False Then 
 MsgBox "Save as " & fileSaveName 
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.