Index et Equiv en VBA

Bonjour,

J'ai cette formule : =SI(SI($B7<>"";INDEX('Base EDT'!$D$8:$G$14;JOURSEM(D$6;2);EQUIV($B7;'Base EDT'!$D$7:$G$7;0));"")=0;"";SI($B7<>"";INDEX('Base EDT'!$D$8:$G$14;JOURSEM(D$6;2);EQUIV($B7;'Base EDT'!$D$7:$G$7;0));""))

Je souhaite la passer en vba mais je m'en sors pas ! J'arrive à faire une RechercheV mais c'est pas suffisant.

Quelqu'un pourrait me guider svp ?

Merci

Bonjour CorinneR, le forum,

A tester:

Range("tacellule").formula="=IF(IF($B7<>"""",INDEX('Base EDT'!$D$8:$G$14,WEEKDAY(D$6,2),MATCH($B7,'Base EDT'!$D$7:$G$7,0)),"""")=0,"""",IF($B7<>"""",INDEX('Base EDT'!$D$8:$G$14,WEEKDAY(D$6,2),MATCH($B7,'Base EDT'!$D$7:$G$7,0)),""""))"

Cordialement,

Rechercher des sujets similaires à "index equiv vba"