Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Pb au report d'une équation

2 réponses
Avatar
Le Nordiste
Bonjour tertous,

je constitue une =E9quation utilisant la VAN(), par le code ci-dessous

'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D
'constituer la formule : VAN =3D "taux;flux_1;flux_2;...)
strVAN =3D "VAN(Taux_Actualisation;"
'l'indice commence =E0 2 pour tenir compte de la somme CAPEX+OPEX de
l'an 1...
For i =3D 2 To intDureeloc
strVAN =3D strVAN & "OPEX_loc"
If i < intDureeloc Then strVAN =3D strVAN & ";"
Next i

strVAN =3D strVAN & ")"
strEquation =3D "=3D(CAPEX_loc + OPEX_loc)+" & strVAN

Range("H12").Formula =3D strEquation
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

J'ai l'erreur d'=E9xecution 1004 "erreur d=E9finie par l'appli ou par
l'objet" lorsque je veux reporter mon =E9quation dans la feuilmle -
derni=E8re ligne de code-.

Je ne vois pas ce qui cloche, merci pour votre aide.

2 réponses

Avatar
jp
Bonjour Le Nordiste

Essaie avec :

Range("H12").FormulaLocal = strEquation

j-p
Avatar
Le Nordiste
Range("H12").FormulaLocal = strEquation



Merci JP ça marche.

Le Nordiste