[VBA-E] Calcul de formule automatique

Version imprimable

18/05/2006, 10h39
ashurai

[VBA-E] Calcul de formule automatique
Bonjour à tous,

J'ai créé une macro qui génére des formule Excel, mais elle ne sont pas calculées.

J'ai pourtant éssayé la méthode calculate(), mais rien n'y fait...

Voici un exemple de formule qui est générée :
Code:

1 2 =RECHERCHEV("CellChFail_G";S1EFFH_10000;2;FAUX)/RECHERCHEV("CellChOrder_G";S1EFFH_10000;2;FAUX)*100
La cellule en question contient bien cette formule, mais elle affiche #NOM?.

Lorsque je rentre en ecriture sur cette cellule, et que j'appui sur la touche <return>, la formule est calculée...

J'avous que je comprend pas bien...

Merci d'avance.
18/05/2006, 10h43
ouskel'n'or

Précise ce qu'est "CellChFail G", j'ai comme une idée

A+
18/05/2006, 10h44
Vesta

C'est la valeur recherchée... Mais ca?
S1EFFH_10000
Au lieu du faux met 0
18/05/2006, 10h51
ashurai
le "S1EFFH_10000" c'est un range nommé, je recherche la valeur "CellChFail_G" dans la matrice nommée "S1EFFH_10000", si je trouve, je renvoi la valeur contenu dans la 2è colonne de la matrice.

Sinon,j'ai bien trouvé une solution, mais je la trouve un peu hardcore :D

Aprés l'insertion de la formule dans la cellule, je la séléctionne, et je simule l'entrée en écriture et la touche return... Ca marche, mais... comment dire... Bah, c'est pas beau tout simplement ...
Code:

1 2 3 4 cellActiveCell.Select SendKeys "{F2}~" DoEvents
18/05/2006, 11h02
Vesta

alalala...

Cells.Formula = "RECHERCHEV ..." pas bien

Cells.Formula = "VLOOKUP ..." c'est mieu lol ca marche ca...

donc je recap: tu remplace RECHERCHEV par VLOOKUP et
RECHERCHEH par HLOOKUP et ca devrait aller
Excel traduit VBA pas
18/05/2006, 11h09
ashurai

Effectivement, c'est mieux.

Du coup, je vais devoir aussi remplacer mes SI et OU !

Merci !
18/05/2006, 11h32
Vesta

De rien incroyable mais vrai je l'ai appris aujourd'hui lol
18/05/2006, 11h45
ouskel'n'or

Si tu utilises FormulaLocal au lieu de Formula, tu peux laisser en français

Citation:

Envoyé par L'aide

Renvoie ou définit la formule de l'objet, en utilisant les références du style A1 dans le langage de l'utilisateur. Argument de type Variant en lecture-écriture pour les objets Range, argument de type String en lecture-écriture pour les objets Series.

A+

Encore des trucs à apprendre, Vesta ? ;)
Je suis comme toi :lol:
18/05/2006, 16h35
Vesta

Ben voila je suis encore plus intelligent aujourd'hui MDR Tu viens de m'apprendre encore qqch c'est trop cool :p

Et au cas ou tu saurais comment renvoyer plusieurs ligne avec cette FCT RECHERCHEH plusieurs lignes satisfaisant a la recherche, je pense qu'il ne retourne que la premiere sinon...

Renvoyer une matrice de valeurs en quelques sortes, moi je me rapelle que j'ai du bricoller ma propre fct pour faire ca...
18/05/2006, 16h43
ouskel'n'or

Désolé, Vesta, je n'utilise jamais RechercheV ni RechercheH, je crée une form et je fais tout ça par macro avec une feuille masquée contenant une bibliothèque de données que je peux modifier comme et quand je veux. Plus simple, plus facile à gérer, et en outre je prive les utilisateurs du plaisir de pouvoir la foutre en l'air ;)

A+