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 :

copier des lignes excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    145
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 145
    Par défaut copier des lignes excel
    bonjour j'aimerais copier des lignes d'un classeur vers un autre en fonction d'un numero
    ex:la ligne 1 de la colonne A du classeur A contient le numero 12
    la ligne 6 de la colonne C du classeur B contient le numero 12
    je veux copier la ligne 6 a partir de la colonne D.

    Comment faire svp
    Merci bcp de votre aide

  2. #2
    Membre confirmé
    Inscrit en
    Mars 2005
    Messages
    109
    Détails du profil
    Informations forums :
    Inscription : Mars 2005
    Messages : 109
    Par défaut
    J'ai pas tout a fait compris ce que tu souhaite faire
    mais tu peut essayer cette syntaxe dans la barre formule de ta case :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    =RECHERCHEV(6;classeur!A1:E300;5;FAUX)

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    145
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 145
    Par défaut explication
    en fait, dans le classeur B je prend le numero GX333 (ligne 1, colonne A par ex), je copie la ligne de la colonne E à J
    Puis dans le classeur A, je fais ctrl+f, je met GX333, puis je colle la ligne copié a partir de la colonne M
    je fais ca pour automatiser cette action car cela prend beaucoup de temps
    Merci de votre aide

  4. #4
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Bonjour,
    Si j'ai un conseil à te donner, c'est d'enregistrer une macro en faisant ta manipulation, puis de regarder le code que tu obtiens.
    Utilise le pour tester une utilisation itérative, c'est à dire sur plusieurs lignes.
    Là, tu auras du code à nous montrer et on pourra plus facilement t'aider à résoudre tes ptoblèmes.

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    145
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 145
    Par défaut suite
    voici le code que j'ai:


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Windows("A.xls").Activate
        Selection.Copy
        Windows("B.xls").Activate
        Windows("A.xls").Activate
        ActiveWindow.SmallScroll ToRight:=-6
        Windows("B.xls").Activate
        Cells.Find(What:="cf1342", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
            :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
            False, SearchFormat:=False).Activate
        Cells.Find(What:="cv1342", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
            :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
            False, SearchFormat:=False).Activate
        Range("M6327").Select
        ActiveSheet.Paste
    et jaimerai le faire pour plusieurs what="xxxxx" qui sont des chiffres contenus dans le classeur A, dans la colonne A

  6. #6
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Hello!
    Tu peux commencer par te créer un tableau contenant les termes que tu veux chercher. Ainsi, avec une boucle, tu n'auras à écrire le code qu'une seule fois.
    Et le "cells", devant le ".Find", tu peux le remplacer par la zone dans laquelle tu veux faire ta recherche.
    Tu peux aussi supprimer la ligne "smallScroll", qui ne sert à rien (tu as dû mettre un coup de roulette à la souris pendant l'enregistrement de la macro).

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2007] copier des lignes dans excel
    Par thval dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 22/05/2011, 10h23
  2. Excel-copier des lignes sur une autre feuille
    Par petecul dans le forum Excel
    Réponses: 7
    Dernier message: 13/09/2007, 02h56
  3. VBA EXCEL - Copier des ligne vers un autre calseur.
    Par patine31 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 17/03/2007, 12h46
  4. [VBA-Excel] copier des lignes de données d'un fichier à un autre
    Par ash_rmy dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 31/07/2006, 10h17
  5. [VBA EXCEL] Copier des lignes
    Par ben7777 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 28/07/2006, 18h22

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