Import sans écraser ... vba

Résolu
julia Namor Messages postés 532 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai une macro qui me permet de copier des données de feuil2 et de les coller à feuil3
La macro copie puis rajoute les données à la suite dans la feuil3....
J'aimerai s'il vous plait que la macro puisse laisser intacte les données identiques entre feuil2 et feuill3 et ne coller que les données nouvelles.
J’espère que je me suis bien expliquée .

Merci d'avance

https://www.cjoint.com/c/ELdp0iurPgy

3 réponses

  1. Maurice
     
    Bonjour
    peux être comme ça
    Sub IMportons()
    Port1 = Feuil4.Range("D" & Rows.Count).End(xlUp).Row - 1
    Port2 = Feuil3.Range("D" & Rows.Count).End(xlUp).Row
       With Feuil3
          For C2 = 2 To Port2
               Range("D" & Port1 + C2).Value = .Range("D" & C2 - 1).Value
          Next
       End With
    End Sub
    

    A+
    Maurice
    0
    1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour Maurice, ca flotte ?
      Sauf erreur de ma part:
      Julia Namor souhaite recopier uniquement les cellules de la feuil2 qui ne sont pas dans la feuil3 a la suite de celles qui seraient deja presentes
      0
  2. julia Namor Messages postés 532 Statut Membre 33
     
    Bonsoir
    Effectivement Maurice c'est bien ce que f894009 a dit.
    ( Julia Namor souhaite recopier uniquement les cellules de la feuil2 qui ne sont pas dans la feuil3 a la suite de celles qui seraient deja presentes)

    Je me disais bien que mes explications étaient ....désastreuses

    merci
    0
    1. julia Namor Messages postés 532 Statut Membre 33
       
      0
      1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > julia Namor Messages postés 532 Statut Membre
         
        Bonjour,

        Je me disais bien que mes explications étaient ....désastreuses Mais non, mais non, chacun d'entre nous a une part de poesie incomprise

        Je regarde la chose
        0