Excel :macro ou fonction ? et quelle formule? [Fermé]

-
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



Afficher la suite 

4 réponses

Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
19
0
Merci
Bonjour,

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

merci :) je vous tiens au courant
Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
19
0
Merci
ça serait bien de donner une suite peut être...
-1
Merci
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