je travaille actuellement sur une macro dans un fichier=20
xls nomm=E9 compression.xls ;)
Je cherche =E0 avec =E0 creer un bouton "parcourir"
pour aller recuperer des fichiers *.xls
Avez vous une id=E9e ?
Merci pour votre aide !
n'hesitez pas =E0 me poser des questions si mon message=20
n'est pas assez clair !
Nosferalto
A noter : je suis d=E9butant merci pour votre indulgence ;)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nosferalto
Bonjour à tous !
Merci Misange j'ai opté pour une autre solution... ton site m'a d'ailleurs beaucoup aidé ! ;) J'ai un autre problème, Le but du jeu est de faire une macro qui liste des fichiers Excel contenu dans un répertoire X ça c fait ! j'arrive à la faire parfatiement, par contre pour la suite, je souhaite recuperer cette meme liste pour faire un traitement sur ces fichiers en les ouvrant automatiquement... Là par contre je ne vois pas malgé mes recherches L'erreur qu'il me met : sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf. ci-dessous. Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../... ' boucle qui me permet de recuperer le nom des fichiers For j = 0 To i - 1 ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx) ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open- Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité... Sheets("HV").Select Range("B6").Select .../...
-----Message d'origine----- bonjour, tu trouveras cela sur la page répertoire de excelabo. Il doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
-- Misange migrateuse http://www.excelabo.net ==Attention, Disciplus a migré et devient excelabo ! ============
"Nosferalto" a écrit dans le message de news:
09b001c3422b$18e1e430$ Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier xls nommé compression.xls ;) Je cherche à avec à creer un bouton "parcourir" pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide ! n'hesitez pas à me poser des questions si mon message n'est pas assez clair !
Nosferalto A noter : je suis débutant merci pour votre indulgence ;)
.
Bonjour à tous !
Merci Misange j'ai opté pour une autre solution...
ton site m'a d'ailleurs beaucoup aidé ! ;)
J'ai un autre problème,
Le but du jeu est de faire une macro qui liste des
fichiers Excel contenu dans un répertoire X
ça c fait ! j'arrive à la faire parfatiement, par contre
pour la suite,
je souhaite recuperer cette meme liste
pour faire un traitement sur ces fichiers en les ouvrant
automatiquement...
Là par contre je ne vois pas malgé mes recherches
L'erreur qu'il me met :
sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf.
ci-dessous.
Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../...
' boucle qui me permet de recuperer le nom des fichiers
For j = 0 To i - 1
ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx)
ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open-
Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité...
Sheets("HV").Select
Range("B6").Select
.../...
-----Message d'origine-----
bonjour,
tu trouveras cela sur la page répertoire de excelabo. Il
doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Nosferalto" <nosferalto@yahoo.fr> a écrit dans le
message de news:
09b001c3422b$18e1e430$a501280a@phx.gbl...
Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier
xls nommé compression.xls ;)
Je cherche à avec à creer un bouton "parcourir"
pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide !
n'hesitez pas à me poser des questions si mon message
n'est pas assez clair !
Nosferalto
A noter : je suis débutant merci pour votre indulgence ;)
Merci Misange j'ai opté pour une autre solution... ton site m'a d'ailleurs beaucoup aidé ! ;) J'ai un autre problème, Le but du jeu est de faire une macro qui liste des fichiers Excel contenu dans un répertoire X ça c fait ! j'arrive à la faire parfatiement, par contre pour la suite, je souhaite recuperer cette meme liste pour faire un traitement sur ces fichiers en les ouvrant automatiquement... Là par contre je ne vois pas malgé mes recherches L'erreur qu'il me met : sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf. ci-dessous. Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../... ' boucle qui me permet de recuperer le nom des fichiers For j = 0 To i - 1 ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx) ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open- Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité... Sheets("HV").Select Range("B6").Select .../...
-----Message d'origine----- bonjour, tu trouveras cela sur la page répertoire de excelabo. Il doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
-- Misange migrateuse http://www.excelabo.net ==Attention, Disciplus a migré et devient excelabo ! ============
"Nosferalto" a écrit dans le message de news:
09b001c3422b$18e1e430$ Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier xls nommé compression.xls ;) Je cherche à avec à creer un bouton "parcourir" pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide ! n'hesitez pas à me poser des questions si mon message n'est pas assez clair !
Nosferalto A noter : je suis débutant merci pour votre indulgence ;)
.
michdenis
Bonjour Nosferalto,
Que contient ton tableau : tabFich(j)
Pour utiliser la méthode Open de l'objet Workbook
tabFich(j) doit contenir le chemin et le nom du fichier C'est à dire : Chemin : "c:Mes documents Fichier : "Classeur.xls"
Workbooks.Open Chemin & Fichier
Ou
En supposant que : tabFich(j) contient le chemin + fichier
Workbooks.Open tabFich(j)
Salutations!
"Nosferalto" a écrit dans le message de news:067201c34467$5229d7a0$ Bonjour à tous !
Merci Misange j'ai opté pour une autre solution... ton site m'a d'ailleurs beaucoup aidé ! ;) J'ai un autre problème, Le but du jeu est de faire une macro qui liste des fichiers Excel contenu dans un répertoire X ça c fait ! j'arrive à la faire parfatiement, par contre pour la suite, je souhaite recuperer cette meme liste pour faire un traitement sur ces fichiers en les ouvrant automatiquement... Là par contre je ne vois pas malgé mes recherches L'erreur qu'il me met : sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf. ci-dessous. Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../... ' boucle qui me permet de recuperer le nom des fichiers For j = 0 To i - 1 ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx) ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open- Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité... Sheets("HV").Select Range("B6").Select .../...
-----Message d'origine----- bonjour, tu trouveras cela sur la page répertoire de excelabo. Il doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
-- Misange migrateuse http://www.excelabo.net ==Attention, Disciplus a migré et devient excelabo ! =========== >
"Nosferalto" a écrit dans le message de news:
09b001c3422b$18e1e430$ Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier xls nommé compression.xls ;) Je cherche à avec à creer un bouton "parcourir" pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide ! n'hesitez pas à me poser des questions si mon message n'est pas assez clair !
Nosferalto A noter : je suis débutant merci pour votre indulgence ;)
.
Bonjour Nosferalto,
Que contient ton tableau : tabFich(j)
Pour utiliser la méthode Open de l'objet Workbook
tabFich(j) doit contenir le chemin et le nom du fichier
C'est à dire : Chemin : "c:Mes documents
Fichier : "Classeur.xls"
Workbooks.Open Chemin & Fichier
Ou
En supposant que : tabFich(j) contient le chemin + fichier
Workbooks.Open tabFich(j)
Salutations!
"Nosferalto" <nosferalto@yahoo.fr> a écrit dans le message de news:067201c34467$5229d7a0$a501280a@phx.gbl...
Bonjour à tous !
Merci Misange j'ai opté pour une autre solution...
ton site m'a d'ailleurs beaucoup aidé ! ;)
J'ai un autre problème,
Le but du jeu est de faire une macro qui liste des
fichiers Excel contenu dans un répertoire X
ça c fait ! j'arrive à la faire parfatiement, par contre
pour la suite,
je souhaite recuperer cette meme liste
pour faire un traitement sur ces fichiers en les ouvrant
automatiquement...
Là par contre je ne vois pas malgé mes recherches
L'erreur qu'il me met :
sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf.
ci-dessous.
Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../...
' boucle qui me permet de recuperer le nom des fichiers
For j = 0 To i - 1
ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx)
ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open-
Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité...
Sheets("HV").Select
Range("B6").Select
.../...
-----Message d'origine-----
bonjour,
tu trouveras cela sur la page répertoire de excelabo. Il
doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
=========== >
"Nosferalto" <nosferalto@yahoo.fr> a écrit dans le
message de news:
09b001c3422b$18e1e430$a501280a@phx.gbl...
Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier
xls nommé compression.xls ;)
Je cherche à avec à creer un bouton "parcourir"
pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide !
n'hesitez pas à me poser des questions si mon message
n'est pas assez clair !
Nosferalto
A noter : je suis débutant merci pour votre indulgence ;)
tabFich(j) doit contenir le chemin et le nom du fichier C'est à dire : Chemin : "c:Mes documents Fichier : "Classeur.xls"
Workbooks.Open Chemin & Fichier
Ou
En supposant que : tabFich(j) contient le chemin + fichier
Workbooks.Open tabFich(j)
Salutations!
"Nosferalto" a écrit dans le message de news:067201c34467$5229d7a0$ Bonjour à tous !
Merci Misange j'ai opté pour une autre solution... ton site m'a d'ailleurs beaucoup aidé ! ;) J'ai un autre problème, Le but du jeu est de faire une macro qui liste des fichiers Excel contenu dans un répertoire X ça c fait ! j'arrive à la faire parfatiement, par contre pour la suite, je souhaite recuperer cette meme liste pour faire un traitement sur ces fichiers en les ouvrant automatiquement... Là par contre je ne vois pas malgé mes recherches L'erreur qu'il me met : sur :".Open"
j'ai mis un bout du code dans le contenu de ce message cf. ci-dessous. Merci pour ton aide si precieuse !
PS : je suis toujours débutant ;)
Code :
.../... ' boucle qui me permet de recuperer le nom des fichiers For j = 0 To i - 1 ActiveSheet.[Titre].Value = i & " FICHIERS " & UCase(xxx) ActiveSheet.[DebListe].Offset(j, 0).Value = tabFich(j)
' C'est ici qu'il me met l'erreur sur le -.Open- Workbooks.Open.Value = tabFich(j)
' je selectionne la feuille puis cellule souhaité... Sheets("HV").Select Range("B6").Select .../...
-----Message d'origine----- bonjour, tu trouveras cela sur la page répertoire de excelabo. Il doit même y avoir
des fichiers à télécharger qui te montrent l'utilisation
-- Misange migrateuse http://www.excelabo.net ==Attention, Disciplus a migré et devient excelabo ! =========== >
"Nosferalto" a écrit dans le message de news:
09b001c3422b$18e1e430$ Bjr à tous !!!
je travaille actuellement sur une macro dans un fichier xls nommé compression.xls ;) Je cherche à avec à creer un bouton "parcourir" pour aller recuperer des fichiers *.xls
Avez vous une idée ?
Merci pour votre aide ! n'hesitez pas à me poser des questions si mon message n'est pas assez clair !
Nosferalto A noter : je suis débutant merci pour votre indulgence ;)
