Mauvaise écriture VBA ???
k
Bonjour, ma formule
'=SI(K5<>0;SI(F5="Dépense";I5*-1;I5);" ")
est bonne mais elle ne s'éxécute pas dans mon application quand jécris :
'Solde en Banque (colonne P) : '=SI(K5<>0;SI(F5="Dépense";I5*-1;I5);" ")
Formule = "=if(K" & MaLigneEcriture & " " & Chr(34)
Formule = "=if(F" & MaLigneEcriture & "=" & Chr(34) & "Dépense" & Chr(34)
Formule = Formule & ",I" & MaLigneEcriture & "*-1,I" & MaLigneEcriture & ")"
Worksheets("Ecritures").Range("P" & MaLigneEcriture).Formula = Formule
Merci de vos lumières
Bonjour,
à tester,
MaLigneEcriture = 5
t = "SI(K" & MaLigneEcriture & "<>0;SI(F5=""Dépense"";I" & MaLigneEcriture & "*-1;I" & MaLigneEcriture & ");"" "")"
Worksheets("Ecritures").Range("P" & MaLigneEcriture).FormulaLocal = "=" & tk
Bonjour,
ça fonctionne très bien.
Merci beaucoup