Recherche valeur dans un meme tableau

Bonjour à tous les garçons (et les filles aussi),

Je vous présente mon cas :

  • Tableau de 5 colonnes sur plusieurs milliers de lignes
  • On va s'occuper de la 3eme ("Element 6") et de la 5eme colonne ("IG")
  • La colonne 5 est le résultat d'une formule mais parfois il y a des vides ( regarder partir de ligne 4103).
Bien que c'est normal, au final il ne doit pas y en avoir ! Pour remédier a cela il faudrait :

On va prendre la cellule vide E4103 pour exemple.

-Comme E4103 vide, regarder si valeur de son "element 6" (C4103) n'est pas vide (ici = "ALTEPROPIV"), trouver son doublon dans la colonne C.

Dans cet exemple doublon présent en ligne 742. Regarder valeur de E742

Et mettre E742 en E4103

-Comme E4103 vide, regarder si valeur de son "element 6" (C4103) n'est pas vide. SI VIDE alors = LAR.

L'explication est un peu longue mais dans la logique c'est juste une recherche par rapport à un autre élément si ce dernier n'est pas vide et importer la donnée correspondante.

Je sais que vous êtes au top sur ce forum et que vous arrivez à faire des miracles en vba. 8)

La je dois vous avouer que je ne sais pas par où commencer.

Vous aurez ma reconnaissance éternelle si vous y arrivez.

Merci d'avance,

Petite_Aline

24classeur1.xlsm (275.88 Ko)

pas forcément éternelle !

Sub remplissage()
Dim C As Range
der = Range("A65000").End(xlUp).Row
For Each cel In Range("A1:A" & der)
    If cel.Offset(0, 4) = "" Then
        cel.Offset(0, 4) = "LAR"
        Set C = Columns("C").Find(cel.Offset(0, 2), Range("C1").End(xlDown), xlValues, xlWhole)
        If Not C Is Nothing Then
            cel.Offset(0, 4) = C.Offset(0, 2)
        End If
    End If
Next
End Sub

Tout à fait ce que je recherchais.

Merci et à bientôt peut-être

Rechercher des sujets similaires à "recherche valeur meme tableau"