ActiveCell.Formula si trop longue !

[Temjeh]

Bonsoir et merci d'avance

Dans une loope j'ai ceci qui uptdate une cell

....
ActiveCell.Formula = TextBox2.Value

Ca fonctionne très bien sauf que si la formule dans le textbox est longue il me met une error

=CHOISIR(CHERCHE(C4;" fcobdlsvtpzaiwreh";1);"";"Cond1";"Cond2";"Cond3";"Cond4";"Cond5";"Cond6";"Cond7";"Cond8";"Cond9";"Cond10";"Cond11"; "Cond12";"Cond13";"Cond14";"Cond15";"Cond16")

....1004 Erreur définie par l'application ou par l'objet

Vous savez pourquoi?

Merci

Trouvé ici: ActiveCell.FormulaLocal

un débutant affronte une "erreur - code 1004"... - VB - VBA - Programmation - FORUM

Temjeh

 

[ODVJ]

Re : ActiveCell.Formula si trop longue !

Bonsoir Temjeh,

as-tu essayé soit avec FormulaLocal soit avec CHOOSE et SEARCH à la place de CHOISIR et CHERCHE?

A+


Je viens de voir que tu avais trouvé la solution tout seul....... trop tard

 

[Mytå]

Re : ActiveCell.Formula si trop longue !

Salut Temjeh, ODVJ et le forum

Essaye avec la synthase suivante :

ActiveCell.Formula = _
"=CHOOSE(SEARCH(C4,"" fcobdlsvtpzaiwreh"",1),"""",""Cond1"",""Cond2"",""Cond3"",""Cond4"",""Cond5"",""Cond6"",""Cond7"",""Cond8"",""Cond9"",""Co nd10"",""Cond11"", ""Cond12"",""Cond13"",""Cond14"",""Cond15"",""Cond16"",""Cond17"")"

Mytå

 

[Temjeh]

Re : ActiveCell.Formula si trop longue !

Oui merci à vous deux j'avais trouvé sur un autre site

Je vais changer pour des termes anglais

Merci quand-même et surtout heureux d'être le 500 ème de Mytå en route vers le 1000

Temjeh