Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

ActiveCell.Formula si trop longue !

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Temjeh

XLDnaute Accro
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
 
Dernière édition:
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
 
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å
 
Dernière modification par un modérateur:
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
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…