IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Création de macro sur 2 fichiers excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mars 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Transports

    Informations forums :
    Inscription : Mars 2015
    Messages : 4
    Par défaut Création de macro sur 2 fichiers excel
    bonjour,
    Voici mon problème :
    je souhaite à partir d'un fichier excel de base créer une macro pour transférer les données de ce fichier dans un autre fichier excel mon souci est que le fichier excel destinataire ne sera jamais le même (une extraction effectuer quotidiennement), or la macro se base sur le nom du fichier (et je souhaiterais le conservé).

    Est ce que quelqu’un aurait une solution à mon problème ??
    Merci d'avance

  2. #2
    Membre habitué
    Homme Profil pro
    Consultant en Business Intelligence
    Inscrit en
    Mars 2015
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Consultant en Business Intelligence
    Secteur : Conseil

    Informations forums :
    Inscription : Mars 2015
    Messages : 10
    Par défaut
    Tu peux variabiliser la cible. Faudrait voir ta macro.

  3. #3
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Tu peux implanter en début de macro un GetOpenFilename qui va ouvrir une fenêtre classique de recherche de fichier (la même que lorsque tu utilises la commande Ouvrir du menu d'Excel) pour te demander le nom de fichier.
    Avec ça, tu pourras pointer sur le fichier que tu souhaites comme destination.

    Attention, cette commande se contente de récupérer le nom de fichier sans l'ouvrir. Il faut faire un Workbooks.Open ensuite pour l'ouvrir réellement.
    Si tu veux faire les deux en une seule ligne, il faut utiliser la méthode FindFile mais, personnellement, je la trouve moins pratique parce qu'elle ne renvoie pas le nom de fichier.

  4. #4
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mars 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Transports

    Informations forums :
    Inscription : Mars 2015
    Messages : 4
    Par défaut
    Voici le début de ma macro :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Sub MacroExtractFormule()
    '
    ' MacroExtractFormule Macro
    '
     
    '
        Range("AH1:AM2").Select
        Selection.Copy
        Windows("extract.xlsx").Activate
        ActiveWindow.ScrollColumn = 2
        ActiveWindow.ScrollColumn = 3
        ActiveWindow.ScrollColumn = 4
        ActiveWindow.ScrollColumn = 5
    Mais je n'arrive pas à implanter la ligne GetOpenFilename, je ne suis pas au top sur les macros !
    Un coup de pouce ?

  5. #5
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par Tivi31 Voir le message
    je n'arrive pas à implanter la ligne GetOpenFilename,
    Est-ce que au moins tu as essayé ?
    Est-ce que tu as regardé la syntaxe de cette méthode dans l'aide VBA d'Excel ?

  6. #6
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mars 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Transports

    Informations forums :
    Inscription : Mars 2015
    Messages : 4
    Par défaut
    Ah oui j'comprend j'ai essayé je me casse la tete dessus!
    J'ai reussi mais ce n'est pas réellement ce que je cherche, je m'explique :

    On considere que pour faire la manip j'ai mes 2 fichiers déjà ouvert donc je n'ai pas besoin d'aller chercher le fichiers, Par contre je veux que ma macro s'applique au fichier ouvert quelque soit son nom

    Je ne sais pas si je suis clair ...

Discussions similaires

  1. Réponses: 6
    Dernier message: 02/08/2017, 16h55
  2. [ASP.Net] Exécuter macro sur 2 fichiers Excel liéé
    Par neo_xnitro dans le forum ASP.NET
    Réponses: 3
    Dernier message: 29/03/2011, 14h16
  3. Réponses: 1
    Dernier message: 11/02/2011, 14h14
  4. [XL-2003] Exécuter une macro sur 2 fichiers excel en même temps..
    Par visto94 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 28/07/2010, 14h09
  5. Macros sur Plusieurs fichiers Excel
    Par Echizen1 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 15/06/2006, 11h21

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo