VBA D'une formule Excel SVP

hassen2050 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention   -  
superip79 Messages postés 7 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

Réponse 1 / 2
Morgothal Messages postés 1236 Date d'inscription   Statut Membre Dernière intervention   183
 
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
Réponse 2 / 2
superip79 Messages postés 7 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