[VBA-EXCEL]formulalocal et guillemets

**vovor** · 15/08/2006, 20h22

pourriez vous m'aider a pouvoir inserer cette formule par un formulalocal. Pour le moment les guillemets m'empechent d'inserer cette formule au moment ou je lance la macro

=SI(INDEX(1:65536;LIGNE();1))<>"";INDEX(1:65536;LIGNE();11)+(7*INDEX(1:65536;LIGNE();5));AUJOURDHUI())

j'ai cherché un peu partout et n'ai pas encore trouvé la methode pour remplacer le ""...

**SfJ5Rpw8** · 15/08/2006, 20h29

pour mettre des " dans un chaine vb le plus simple c'est de les doubler..

[edit] puis il y as une parenthése en trop, cela donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
"=SI(INDEX(1:65536;LIGNE();1)<>"""";INDEX(1:65536;LIGNE();11)+(7*INDEX(1:65536;LIGNE();5));AUJOURDHUI())"

**vovor** · 15/08/2006, 21h21

j'ai essayé mais ça refuse....

la formule "=INDEX(1:65536;LIGNE();11)+(7*INDEX(1:65536;LIGNE();5))" s'inserre tres bien...

**SfJ5Rpw8** · 15/08/2006, 21h26

c'est bon pour moi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Sub test()
 
 ActiveCell.FormulaLocal = "=SI(INDEX(1:65536;LIGNE();1)<>"""";INDEX(1:65536;LIGNE();11)+(7*INDEX(1:65536;LIGNE();5));AUJOURDHUI())"
End Sub