Recherche VBA

Bonjour tout le monde

Je connaissais déja Exel Mais avec VBA c'est génial

Je viens à peine de commencer et je bute naturellement sur l'equivalent de la rechercheV

Je voudrais saisir des données par Userform dont celles de la colonne B de la feuille 1 sont données par

celles de la colonne de la feuille 2 après une codification Ex code 1 =a: code 2= b code 3=c

Exemple En saisissant 1 on a a de l'autre côté 2 donne b

Voici mon code

With Sheets("Feuil1)

For Each c In Range("A2:A10")
            If c <> "" Then
            Range("B" & Derlig1) = WorksheetFunction.VLookup(.Range("B2:B10").Value, Sheets("Feuil2").Range("A1:B100"), 1, False)

            Else
            .Range("B2:B10").Value = ""
           End If
End with

Mais j'ai des #NA partout

:merci de votre aide

Bonjour BAKH et bienvenue sur le forum,

Si tu joignais un classeur exemple, ce serait plus facile pour t’aider.

A+

Frangy

Merci de intéresser a un problème

ci joint un petit classeur avec le code excel

Dans ce cas 3 éléments qu on pourrait étendre

Re,

Sub test()
Dim C As Range
    With Worksheets("Feuil1")
        For Each C In .Range("A2:A" & .Range("A" & Rows.Count).End(xlUp).Row)
            If C <> "" Then
                C.Offset(0, 1) = WorksheetFunction.VLookup(C.Value, Worksheets("Feuil2").Range("A:B"), 2, False)
            Else
                C.Offset(0, 1) = ""
            End If
        Next C
    End With
End Sub

A+

Frangy

Génial un grand pas de franchi

Je te remercie infiniment. je n'aurais jamais vu seul. (en tout cas pas de sitôt)

Le seul Hic c'est qu'en allant plus loin la dernière ligne n'est jamais renseignée.

Tout marche sauf la dernière ligne

Mille merci pour ta disponibilité et ta prompte réaction

A+

Le seul Hic c'est qu'en allant plus loin la dernière ligne n'est jamais renseignée.

Tout marche sauf la dernière ligne

Je ne vois pas très bien le problème (trop loin peut-être !).

Un exemple ?

A+

Frangy

Je pense que le code est bon.

Le problème est a chercher dans mon adaptation a un autre classeur.

je vais chercher le pourquoi du décalage.

Ma première visite dans le forum a été un succès .

j y ai déjà pris gout

bon weekend

FIN

A+

merci d'implémenter cette fonction pour cette fichier

Bonjour bouahid,

Tout d'abord, je dois te rappeler qu'Il est recommandé de créer un nouveau sujet plutôt que se raccrocher sur la discussion d'un autre participant.

Voici ton fichier en retour

A+