XL 2013 remplacer formule excel en formule vba

[RomainPOIRET]

Bonjour à tous,

Petite question, je souhaite transformer cette formule excel en formule vba :

"=(7*DROITE(D2);2)+DATE(ANNEE(AUJOURDHUI());1;3)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;3))+1)"

Pouvez-vous m'aider ?

D'avance merci,

Romain

 

[jmfmarques]

Bonjour

transformer cette formule excel en formule vba

n'est pas vraiment clair.
Qu'entends-tu exactement par "formule VBA" ?
Doter une cellule d'une formule Excel, depuis VBA, est une chose
Ecrire en VBA des instructions générant le même résultat que celui d'une formule Excel en est une autre.

 

[RomainPOIRET]

Bonjour @jmfmarques
Je veux intégrer cette formule en ".Formula" et non pas ".FormulaLocal",

En espérant avoir répondu à ta question,

Romain

 

[jmfmarques]

Ah...
Et tu veux donc connaître la traduction en VBA (propriété Formula) de la formule locale Excel ....
Une idée toute bête :
1) tu rentres manuellement cette formule (en local, donc) depuis Excel
et
2) tu affiches sa traduction VBA par :
msgbox range(....).formula
et tu sauras tout de la forme VBA qu'elle doit avoir.

 

[RomainPOIRET]

Salut @jmfmarques , j'ai trouvé, voici ce que j'ai inscrit :

Application.Index(Sheets("A").Columns("A:H"), Application.Match(Range("B" & i).Value, Sheets("A").Columns("E:E"), 0), 4)

Voilà, merci pour le tuyau

Romain