Fonction VLOOKUP

Résolu
Bonsoir

Je cale sur une formule vba

x = Application.VLookup(m, Sheets("BDD").Range("a2:a" & DL), 1, False)

une fois x trouvé je voudrais le remplacer par le chiffre 0

Comment faire?
merci énorménent de votre aide

Bien à vous

3 réponses

  1. Merci beaucoup Gyrus ,
    j'ouvre un autre post pour soumettre la demande d'aide sur la maj de la base de données
    Bien à vous
    0
    1. BONSOIR Gyrus .

      C'est tout à fait ce qu'il me faut .Un grand merci à toi.

      Je me permets de soumettre un autre souci , (s'il fallait créer un autre post je m'en excuse).

      Comment pourrais je effectuer par vba une mise à jour d'une base de données ( noms prénoms age sexe....) en retirant tous les noms "Namor" par exemple?

      merci de votre aide

      Bien à vous
      0
      1. Bonjour,

        Essaie comme cela

        Sub test()
        Dim L
        m = "<Nom Cherché>"
        With Sheets("BDD")
        DL = .Range("A" & Rows.Count).End(xlUp).Row
        L = Application.Match(m, .Range("A1:A" & DL), 0)
        If Not IsError(L) Then .Range("A" & L).Value = 0
        End With
        End Sub


        A+
        0