VBA D'une formule Excel SVP

hassen2050 Messages postés 50 Statut Membre -  
superip79 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
SVP j'ai besoin du code VBA de cette formule Excel

Si ( Est erreur( rechercheV(C3096;S:T;2;Faux));'' '';RechercheV(C3096;S:T;2;faux))

C'est Hyper Urgent SVP

2 réponses

  1. Morgothal Messages postés 1350 Statut Membre 184
     
    Bonjour,

    Sub formule()

    ActiveCell.Formula = "=IF(ISERR(VLOOKUP(R[3092]C[2],C[18]:C[19],2,FALSE)),"""",VLOOKUP(R[3092]C[2],C[18]:C[19],2,FALSE))"
    Range("A4").Select

    End Sub
    0
  2. superip79 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
     
    ou alors :

    With Worksheets("tafeuille")
    Set found = .Columns("S").Find("C3096", LookIn:=xlValues)
    If Not found Is Nothing Then
    .Range("lacelluleàremplir").Value = .Range("T" & found.Row).Value
    End If
    End With
    0