RECHERCHER :
COMMUNAUTE MP
Identifiez vous ...
Devenir Membre
J'ai oublié mon MDP
DOMAINE MP
Bavardages
Langages Généraux
Langages Web
Langages DotNet
Autres langages
Dev. Jeux Video
Sécurité
Sys. Exploitation
Graphismes
Logiciels
Réseaux
Bases de données
Méthodologies
Emplois High-tech
Aide juridique
Articles juridiques
FORUM
Index des forums
Ajouter un sujet
Rechercher sujet
Contact Responsable
Devenir modérateur
CHAT MP IRC
Votre pseudo ...
Serv: irc.irc-land.org
Chan: #MoteurProg
PARTICIPER
Plus de 3500 emplois.
Rechercher un job
Déposez votre CV
Emplois High-tech

Visiteur MP

 Macro ouverture fichier excel

Forum : VISUAL BASIC
Sous Catégorie : Aucune
Type du sujet : Sujet Normale
FAQ : FAQ VISUAL BASIC

SUIVI DES SUJETS PAR MAIL

SUIVI PAR MAIL INACTIF

RESOLUTION DU SUJET SUJET NON RESOLU
BLOQUAGE DU SUJET SUJET ACTIF
APPARTENANCE A LA FAQ N'APPARTIENT PAS A LA FAQ


PAGE : [1]

POSTER UN NOUVEAU SUJET REPONDRE A CE SUJET

FORUM VISUAL BASIC

PREMIERE PAGE

PAGE PRECEDENTE

Page précedente

Page suivante

PAGE SUIVANTE

DERNIERE PAGE
brumalex
Nouveau membre
Inscrit : 01/04/2008
Messages : 1
Message
#151445
Posté le 01/04/08 à 13:46
Bonjour

J'ai besoin de créer une macro que je puisse utiliser dans n'importe quel fichier excel.
Le cas est le suivant : Je vais recevoir ~70 fichiers excel (formulaires), je dois les ouvrir un par un et copier une information specifique de chaque fichier dans un nouveau fichier appelée "compilation".

Comment je peux faire pour que ma macro fonctionne en sachant que les 40 fichiers ont des noms differents?

Merci de votre aide
Brumalex

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

Publicité
Inscrit : X
Messages : X
Message
#Aucun

HAUT DE PAGE

  

arrial
Nouveau membre
Avatar de arrial
Inscrit : 15/03/2008
Messages : 9
Message
#151466
Posté le 02/04/08 à 10:18
Salut,

Chui pas un prô de VB, plutôt de VBA, et plutôt même de Excel tout pur ...

Moi, je créerais un fichier type Excel que j'enverrais à "mes clients".
À partir de là, j'y verrais plud clair ...


Cordialement, @+
__________________________
arrial

"Le pire n'est jamais acquis."

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

bigguiz
Membre MP
Avatar de bigguiz
Inscrit : 27/07/2006
Messages : 235
Message
#151470
Posté le 02/04/08 à 11:08
Salut,

J'utilise ce bout de code pour ouvrir automatiquement un autre fichier excel


Function OpenSFD() As String Dim classeur As String classeur = Application.GetOpenFilename() If classeur <> "Faux" Then Workbooks.Open classeur OpenSFD = classeur End If End Function


Ensuite j'utilise ceci:
ThisWorkbook.Activate
Workbooks(NOM_FICHIER).Activate
__________________________
Eoliennes et informatique sur freresguizmo

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

RGI
Superviseur :
- Logiciels
Modérateur :
- Visual basic
- Bureautique
Avatar de RGI
Inscrit : 21/08/2006
Messages : 1713
Message
#151516
Posté le 03/04/08 à 09:34
Bonjour

Vous n' êtes pas dans le bon forum

bon!!!!!!!!!!!

Workbooks.Open ("nom classeur .xls")

doit suffire

Salutations

RGI
__________________________
PS: VBA pour EXCEL est maintenant dans Bureautique Smiley
merci de poser vos questions VBA à cet endroit
salutations

RGI

Un MERCI en retour c'est sympa
et ne pas oublier le tag :Imageaprès résolution.

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

Visiteur MP
Membre du club
Inscrit :
Messages : 1230
Message
#151757
Posté le 10/04/08 à 23:03
Au delà du code:
Enregistrer la macro dans classeur macros personnelles
La macro sera accessible dans toute application Excel.

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE ALLER VOIR SON SITE

ocean
Nouveau membre
Inscrit : 21/05/2008
Messages : 20
Message
#154533
Posté le 25/06/08 à 21:16
Salut,
je suis heureuse de voir que je ne suis pas la seule à ramer. Je suis justement confrontée au même problème.
Dans mon cas, mes noms de fichiers ont juste la fin du nom qui change (ils correpondent à des numéros). J'ai fait une liste des numéros dans une colonne de excel. A partir de la j'ai créé une variable qui me rédéfini le chemin d'acces à mon fichier en fonction de la cellule sur laquelle je tombe au fur et à mesure que meslignes sedécalent vers le bas.
Jusque là tout va très bien et mon programme marche. Le problème vient après: justement lorsque je veux ouvrir le fichier y copier une de ses lignes et la copier dans mon fichier excel que j'utilise.
Pourouvrir mon classeur j'ai essyé d'utiliser cette formule :
Workbooks.Open ("nom classeur .xls")
Le problème est qu'elle m'oblige à écrire le détail des différents chemins manuellement et de le répéter à chaque dossier. Du coup j'ai essayé de la modifier:
Workbooks.Open Filename = nom2
(nom2 était la variable de mes chemins)
Le problème est que ça ne marche pas. Jene sais pas comment faire. RGI, Je vois que tu sembles avoir quelques idées. serias tu intéresserpour m'aider, toi ou quelqu'un d'autre d'ailleurs.

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 
POSTER UN NOUVEAU SUJET REPONDRE A CE SUJET

PREMIERE PAGE

PAGE PRECEDENTE Page précédente

Page suivante

PAGE SUIVANTE DERNIERE PAGE

FORUM VISUAL BASIC



    PAGE : [1]



.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.