OVH Cloud OVH Cloud

Macro à finir... merci d'avance à vous tous

2 réponses
Avatar
Sylvie LAURENT
bonsoir,

Et voilà la petite Sylvie de retour de vacances ......
J'ai une petite question, j'ai écrit un code qui permet l'ouverture d'une
boite de sélection de fichiers dans un répertoire donné, mais je dois
sélectionner tous les fichiers présents dans ce répertoire et appuyer sur
ouvrir pour continuer la macro, comment automatiser cette partie de ma macro
??

Application.ScreenUpdating = False
LstFich = Application.GetOpenFilename("Fichiers Excel (*.xls),*.xls", ,
"Sélection des bons en cours", , True)

Et voilà comment lui demander de sélectionner automatiquement les x fichiers
présents et de faire Ouvrir.
Pour le faire manuellement, je sélectionne un fichier, je fais CTl + A et
Ouvrir....

Quelqu'un peut t'il m'aider ??

Bises à vous tous

Sylvie

2 réponses

Avatar
Philippe.R
Bonsoir Sylvie,
Avec ces bases :
http://frederic.sigonneau.free.fr/code/Fichiers/ListeFichiersDossier3.txt
http://frederic.sigonneau.free.fr/code/Fichiers/OuvertureTableauFichiers.txt
il doit y avoir moyen de ficeler quelquechose
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Sylvie LAURENT" a écrit dans le message de
news:
bonsoir,

Et voilà la petite Sylvie de retour de vacances ......
J'ai une petite question, j'ai écrit un code qui permet l'ouverture d'une
boite de sélection de fichiers dans un répertoire donné, mais je dois
sélectionner tous les fichiers présents dans ce répertoire et appuyer sur
ouvrir pour continuer la macro, comment automatiser cette partie de ma macro
??

Application.ScreenUpdating = False
LstFich = Application.GetOpenFilename("Fichiers Excel (*.xls),*.xls", ,
"Sélection des bons en cours", , True)

Et voilà comment lui demander de sélectionner automatiquement les x fichiers
présents et de faire Ouvrir.
Pour le faire manuellement, je sélectionne un fichier, je fais CTl + A et
Ouvrir....

Quelqu'un peut t'il m'aider ??

Bises à vous tous

Sylvie




Avatar
Sylvie LAURENT
Bonsoir Philippe,

Merci mais je n'y arrive pas, je ne veux pas lister les noms, mais les
ouvrir directement, as tu une idée ??

Bien sincèrement pour ton aide et merci d'avance de me sortir de cette
galère !
Sylvie

"Philippe.R" a écrit dans le message de
news:
Bonsoir Sylvie,
Avec ces bases :
http://frederic.sigonneau.free.fr/code/Fichiers/ListeFichiersDossier3.txt

http://frederic.sigonneau.free.fr/code/Fichiers/OuvertureTableauFichiers.txt

il doit y avoir moyen de ficeler quelquechose
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Sylvie LAURENT" a écrit dans le message de
news:
bonsoir,

Et voilà la petite Sylvie de retour de vacances ......
J'ai une petite question, j'ai écrit un code qui permet l'ouverture
d'une


boite de sélection de fichiers dans un répertoire donné, mais je dois
sélectionner tous les fichiers présents dans ce répertoire et appuyer
sur


ouvrir pour continuer la macro, comment automatiser cette partie de ma
macro


??

Application.ScreenUpdating = False
LstFich = Application.GetOpenFilename("Fichiers Excel (*.xls),*.xls", ,
"Sélection des bons en cours", , True)

Et voilà comment lui demander de sélectionner automatiquement les x
fichiers


présents et de faire Ouvrir.
Pour le faire manuellement, je sélectionne un fichier, je fais CTl + A
et


Ouvrir....

Quelqu'un peut t'il m'aider ??

Bises à vous tous

Sylvie