RechercheV qui conserve le format cellule

Bonjour à tous,

Je cherche à mettre en place un équivalent de la fonction RECHERCHEV qui conserve le format (couleur, gras...) de la cellule trouvée.

J'ai vu sur un autre forum que cela n'est pas possible.

N'y-a-t-il pas un moyen ? VBA ?

Merci pour votre attention.

Amicalement

Bonjour Snail.

En VBA c'est tout à fait possible de le réaliser.

Si tu pouvais joindre un fichier exemple, nous pourrions te répondre efficacement.

Bonjour,

Merci pour votre réponse.

J'ai mis en pièce jointe un fichier pour exemple.

J'ai des dimensions de débits matière (épaisseur, largeur, longueur), avec un code article matière.

Sur certains débit il y a un sens de fibrage à prendre en compte. Celui-ci est repéré par un fond orange dans la cellule.

Dans l'onglet "Recherche", j'ai une liste de code article est j'aimerais effectuer une RECHERCHEV pour trouver les épaisseurs, largeurs, longueurs en gardant le format des cellules pour savoir ou se trouve le sens de fibrage en orange s'il y en a un.

Voila.

Merci pour votre aide.

Tu peux utiliser le code ci-dessous :

Option Explicit

Sub Recherche()
Dim f1 As Worksheet, f2 As Worksheet
Dim i&, j&, d As Object

Set f1 = Sheets("Données"): Set f2 = Sheets("Recherche")
With f1
    Set d = CreateObject("scripting.dictionary")
    i = 2
    Do While .Cells(i, 4).Value <> ""
        d(.Cells(i, 4).Value) = i
        i = i + 1
    Loop
End With

With f2
    i = 2
    Do While .Cells(i, 1).Value <> ""
    If d.exists(.Cells(i, 1).Value) Then
        j = d(.Cells(i, 1).Value)
        f1.Range(f1.Cells(j, 1), f1.Cells(j, 3)).Copy f2.Cells(i, 2)
    End If
    i = i + 1
    Loop
End With
End Sub

On répertorie les différents éléments de la feuille Données en enregistrant la ligne faisant référence à l'article.

Ensuite on boucle les articles de la feuille Recherche.