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 :

extraction des données


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre très actif
    Homme Profil pro
    Etudiant
    Inscrit en
    Janvier 2012
    Messages
    118
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Janvier 2012
    Messages : 118
    Par défaut extraction des données
    Bonjour!

    J'ai besoin d'une aide sur une macro que je ne vois pas comment construire.

    Dans le fichier ci dessous il y a un tableau dans l'onglet Port_FC+.

    J'aimerais que si dans ce tableau les valeurs dans la colonne E n'apparaissent pas dans l'inventaire dans la colonne A de l'onglet Port_FC+_SansMvt, et bien certaines infos viennent du premier tableau se copier coller en dessous de l'inventaire.

    Of course j'ai fait un exemple sur dans le fichier ci joint


    J'espere que je me suis assez bien exprimé???

    N'hésiter pas a me demander je reste tout pret.

    Merci d'avance
    Fichiers attachés Fichiers attachés

  2. #2
    Membre très actif
    Homme Profil pro
    Etudiant
    Inscrit en
    Janvier 2012
    Messages
    118
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Janvier 2012
    Messages : 118
    Par défaut
    Je pensais a une macro comme ça mais en copiant les données de l'onglet "Mvt FC" non en 231 mais apres l'inventaire qui est matérialisé par des case blanche

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    Sub NouveauMouvement()
     
    For i = 35 To 230
     For j = 10 To 182
     
    If Sheets("Port_FC+_SansMvt").Range("A" & i) <> Sheets("Port_FC+").Range("E" & j) Then
     
     
     Sheets("Port_FC+").Select
        Range("E" & j).Select
        Selection.Copy
         Application.CutCopyMode = False
        Selection.Copy
        Sheets("Port_FC+_SansMvt").Select
        Range("A231").Select
        ActiveSheet.Paste
     
     
        Sheets("Port_FC+").Select
        Range("F" & j).Select
        Application.CutCopyMode = False
        Selection.Copy
        Sheets("Port_FC+_SansMvt").Select
        Range("C231").Select
        ActiveSheet.Paste
     
        Sheets("Port_FC+").Select
        Range("J" & j).Select
        Application.CutCopyMode = False
        Selection.Copy
        Sheets("Port_FC+_SansMvt").Select
        Range("L231").Select
        ActiveSheet.Paste
     
     
     
    End If
     
    Next
    Next
     
     
    End Sub

Discussions similaires

  1. [RSS] extraction des données d'un flux
    Par toddy_101 dans le forum APIs
    Réponses: 4
    Dernier message: 23/02/2007, 17h28
  2. vc++(6)+extraction des données dans une image(.tif)
    Par spootnic22 dans le forum Visual C++
    Réponses: 1
    Dernier message: 22/11/2006, 16h14
  3. [MySQL] Problème de Charset à l'extraction des données
    Par naoufal01 dans le forum PHP & Base de données
    Réponses: 3
    Dernier message: 06/11/2006, 13h14
  4. extraction des données dans une table Access
    Par moabomotal dans le forum Access
    Réponses: 2
    Dernier message: 26/05/2006, 11h17

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