VBA D'une formule Excel SVP

Question

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

Morgothal · Answer

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

superip79 · Answer

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

VBA D'une formule Excel SVP

2 réponses

Votre réponse

Newsletters