Excel :macro ou fonction ? et quelle formule?

cvivi60 -  
zivodul8 Messages postés 248 Statut Membre -
Bonjour,

Au boulot j'essaye de rassembler 2 tableaux, j'ai déjà recopier le 2ème sur une feuille dans le 1er tableau.
Ensuite j'ai pas envi de recopier toutes les adresses mail que j'ai dans le 2ème fichier sur le 1er car j'ai 500 lignes et je n'ai pas les mails de tout le monde.
j'explique j'ai dans le 1er fichier 500 entreprises avec leurs n° de siret ect ... dans le 2ème fichier j'ai 300 mail de correspondance avec n° de siret. Afin de voir lesquels je n'ai pas le mail je voudrais copier les adresses mails dans le 1er fichier avec une formule ou macro qui dirait :
si cette céllule (n°siret) est égale a une des céllules de la feuille 1 (n° siret) copier la cellule de la même ligne que celui ci où est situé le mail.

j'espère que je suis assez claire.

Merci d'avance.

Virginie

4 réponses

  1.
    zivodul8 Messages postés 248 Statut Membre 22
     
    Bonjour,

    Si j'ai bien compris, la solution est une formule Excel : =RECHERCHEV
    0
  2. cvivi60
     
    ok ! je testerais demain alors lol

    merci :) je vous tiens au courant
    0
  3. zivodul8 Messages postés 248 Statut Membre 22
     
    ça serait bien de donner une suite peut être...
    0
  4. geegee
     
    Bonjour,

    deux boucle for imbriquée.

    for parcour la cellule
    for parcour l'autre colonne
    si les deux sont egale faire

    Private Sub Test()
    Dim rng As Range
    Dim cel As Range
    For Each cel In Worksheets(1).Columns("U").Cells
    If cel.Value = 2 Then
    If rng Is Nothing Then
    Set rng = cel.Offset(, -5).Resize(, 6)
    Else
    Set rng = Union(rng, cel.Offset(, -5).Resize(, 6))
    End If
    End If
    Next
    If Not rng Is Nothing Then
    rng.Copy Destination:=Worksheets("2").Range("A9")
    End If
    End Sub
    source:http://www.commentcamarche.net/forum/affich-19141287-macro-excel-selection-cellules
    -1