Formule Formula + Variable [Résolu]

[florenllf]

Bonjour,
Je souhaite intégrer une variable dans une formule que j'insère dans une cellule à l'aide de VBA.
La formule qui marche mais elle fait toujours référence à A9

Cells(Row + i, 9).Formula = "=IF(INDEX(BIA_RTO_DEPENDENCIES,A9,1)<>0,INDEX(BIA_RTO_DEPENDENCIES,A9,1),"""")"

Je souhaite placer mavar comme tel.....d'après les différents forums cela doit être possible mais je n'y arrive pas:

Cells(Row + i, 9).Formula = "=IF(INDEX(BIA_RTO_DEPENDENCIES,A"&mavar&",1)<>0,INDEX(BIA_RTO_DEPENDENCIES,A9,1),"""")"

Merci de votre aide.

Bonne journée.

 

[tototiti2008]

Re : Formule Formula + Variable

Bonjour FlorenIIf,

tu dois pouvoir te passer de variable en utilisant les références L1C1

Cells(Row + i, 9).FormulaR1C1 = "=IF(INDEX(BIA_RTO_DEPENDENCIES,RC1,1)<>0,INDEX(BIA_RTO_DEPENDENCIES,RC1,1),"""")"

 

[Si...]

Re : Formule Formula + Variable

salut

et ainSi... ?

'mavar déclarée As String, par exemple mavar="A9"
Cells(1, 1).Formula = "=IF(INDEX(BIA_RTO_DEPENDENCIES," & mavar & ",1)<>0,INDEX(BIA_RTO_DEPENDENCIES," & mavar & ",1),"""")"

 

[Numidia]

Re : Formule Formula + Variable

juste un text bonjour tt le monde

 

[florenllf]

Re : Formule Formula + Variable

'mavar déclarée As String, par exemple mavar="A9"
Cells(1, 1).Formula = "=IF(INDEX(BIA_RTO_DEPENDENCIES," & mavar & ",1)<>0,INDEX(BIA_RTO_DEPENDENCIES," & mavar & ",1),"""")"

Merci pour ta solution, je viens de comprendre mon erreur, il ne met pas automatiquement les espaces donc je pensais que le code était faux alors que si je met les espaces moi même cela fonctionne.

Bonne journée

 

[TempusFugit]

Re : Formule Formula + Variable [Résolu]

Bonjour

On peut aussi l'écrire ainsi

Dim mavar As String, f As String
f = "INDEX(BIA_RTO_DEPENDENCIES," & mavar & ",1)"
Cells(1, 1).Formula = "=IF(" & f & "<>0," & f & ","""")"