Discussion :

[a_centaure]

Bonjour,

j'ai une macro dans laquelle j'appelle fonction GetOpenFilename pour ouvrir la boite de dialogue "ouvrir" d'excel et recuperer un fichier que je traite par la suite.

Helas, de facon aleatoire, mais bien souvent, la boite s'ouvre avec un listing de dossiers/fichiers dans un ordre completement aleatoire. J'ai beau appuyer sur les entetes de tri par noms ou dates, rien à faire, ca ne veut pas se remettre dans un ordre coherant (ordre alpha par exemple pour les noms)

Par moment, à force de monter/descendre dans les dossier, l'arrive à retrouver le classement logique de ma liste (ordre alpha par exemple). Mais cela est bien insatisfaisant pour un utilisteur lambda qui va utiliser ma macro.

Avez vous une idée pour pouvoir contourner facilement ce bug (ou y a t-il une option à ajouter?)

cordialement

[CODYCO]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Parcourir = Application.GetOpenFilename("Fichier de données, *.xls", 1, "Choisissez votre fichier import ")

Dans les parenthese tu peux préciser un grand nombre de paramètre comme je le fais dans cet exemple le type de fichier ".xls"

Regarde dans l'aide les différent paramètres qui pourrais te convenir...

[a_centaure]

j'ai deja regardé de ce coté, rien pour le tri des fichiers :

expression.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText, MultiSelect)

expression Obligatoire. Expression qui renvoie un objet Application.

FileFilter Argument de type Variant facultatif. Chaîne spécifiant les critères de filtrage des fichiers.

Cette chaîne est constituée de paires de chaînes de caractères représentant le filtre de fichier suivies de la spécification de filtre de fichier à caractère générique de MS-DOS, dont chaque partie et chaque paire est séparée par une virgule. Chaque paire distincte est contenue dans la liste déroulante Type de fichier. Par exemple, la chaîne suivante spécifie deux filtres de fichiers (fichiers texte et macros complémentaires) : « Fichiers texte (*.txt),*.txt,Macros complémentaires (*.xla),*.xla ».

Pour utiliser les expressions multiples à caractère générique de MS-DOS pour un seul type de filtre de fichier, séparez les expressions à caractères génériques par des points-virgules ; par exemple, « Fichiers Visual Basic (*.bas; *.txt),*.bas;*.txt ».

Cet argument devient par défaut « Tous les fichiers (*.*),*.* » s'il n'a pas été spécifié.

FilterIndex Argument de type Variant facultatif. Spécifie les numéros d'index des critères de filtrage de fichier par défaut, de 1 au nombre de filtres spécifiés dans FileFilter. Le premier filtre de fichier est utilisé si l'argument n'a pas été spécifié ou s'il est plus grand que le nombre de filtres présents.

Title Argument de type Variant facultatif. Spécifie le titre de la boîte de dialogue. Si cet argument n'a pas été spécifié, le titre est « Ouvrir ».

ButtonText Argument de type Variant facultatif. Macintosh uniquement.

MultiSelect Argument de type Variant facultatif. Affectez lui la valeur True pour permettre la sélection de plusieurs noms de fichiers. Affectez lui la valeur False pour permettre la sélection d'un seul nom de fichier. La valeur par défaut est False.