Copie de la valeur d'une cellule qui est le résultat d'une formule

Question

J'ai eu de l'aide cette après-midi de François qui a résolu mon souci de code pour une macro, par contre j'ai un autre souci à résoudre. Je voudrais copier sur une feuille la valeur d'une cellule qui est sur une autre feuille et qui a la formule suivante (en orange) dans une macro : If Range("D4").Value = "Cerise" Then With Sheets("cerise") derligne = .Range("B" & Rows.Count).End(xlUp).Row + 1 .Range("B" & derligne) = Range("D2").Value .Range("C" & derligne) = Range("D3").Value .Range("D" & derligne) = Range("D4").Value .Range("E" & derligne) = Range("D6").Value .Range("F" & derligne) = Range("D5").Value .Range("H" & derligne) = Range("D7").Value .Range("G" & derligne).FormulaR1C1 = "=R&#91;-1&#93;C-&#91;@DEBIT&#93;+&#91;@CREDIT&#93;" Comment puis-je faire ? Merci d'avance de votre aide...

LouReeD · Accepted Answer

A la suite de la ligne "orange" vous donnez à votre cellule cible la valeur de cette cellule : Range("A1").Value = .Range("G" & derligne).Value @ bientôt LouReeD...