VBA excel instertion formule

Question

Bonjour,

Je viens de réaliser une petite macro:
Dim ma_var as string
ma_var  = InputBox("Indiquer ma_var", "ma_var ")
    ActiveCell.FormulaR1C1 = "=ARRONDI.SUP(RC[2]/(1-0." & ma_var  & "),2)" 'mettre la formule

Lorsque j'execute ma macro il y a dans ma case #NOM? or quand je fais F2 puis Entré la formule est prise en compte et la valeur calculée apparaît, donc ma formule est bien bonne.

je ne comprends pas.
Merci pour votre aide!

Molenn · Answer

Je vois deux possibilités :

- Tu n'es pas en calcul automatique, mais à lire ton pb, je ne suis pas convaincu
- Cette option me convainc plus : .FormulaR1C1 est utilisé au format international de mémoire, c'est à dire que les formules sont à inscrire en anglais (va falloir chercher l'équivalent, par ex., quand tu veux utiliser RECHERCHEV, tu dois écrire VLOOKUP).
Ton code doit en fait inscrire ta formule dans la cellule, sauf qu'Excel ne l'interprète comme une formule qu'après que tu sois allé valider dans Excel.
Donc, soit tu mets l'équivalent anglais, soit tu utilises (toujours de mémoire), .LocalFormulaR1C1 ou .FormulaLocalR1C1 je ne sais plus, qui te permet cette fois d'utiliser la formule en Français (à condition bien sûr que ta version d'Excel soit française ^^)

Molenn

cs_Liro · Answer

Salut Molenn,

Merci pour ta réponse.
J'ai déjà essayé avec le nom en anglais (en faisant une nouvelle macro et en saisissant la formule pendant que la macro est enregistrée, puis j'ai récupéré le code) mais celà n'arrange pas mon pb!

C'est quoi le calcul automatique? Si je saisie la formule manuellement, la valeur calculée apparaît bien, si après avoir lancé la macro je fais F2 puis entrée la valeur calculée apparaît aussi!

cs_MPi · Answer

J'y comprend rien à ces [R1C1]

Pourrais-tu écrire la formule telle que tu la vois dans la barre de formule (F2)
La formule anglaise, au cas où, est RoundUp

    Dim MaVar As String
    
    MaVar = InputBox("Entrer MaVar")
    ActiveCell.Formula = "=RoundUp(A17/0." & MaVar & ",2)"

Mais est-ce l'équivalent de ce que tu recherches avec ce R1C1 ?

MPi

cs_Liro · Answer

R1C1 signifie que tu sélection la cellule ou tu es placé.

Pour info la solution c'était d'ajouter avant:
ActiveCell.select même si un ami m'a confirmé que chez lui ça ne marche pas même avec cet ajout.

Bonne soirée!

cs_MPi · Answer

En fait, je connais R1C1 comme étant Row1Column1
Mais quand j'écris une formule en Excel, j'écris A1
Quand Excel écrit une formule dans une cellule d'une feuille, il écrit A1
Quand je veux parler d'une cellule dans une feuille, je vais dire A1
et jamais 1A

Je ne sais même pas pourquoi cette notation existe... mais bon ... mon vieux cerveau va y survire 

Que vaut donc R dans RC[2] ?

MPi

VBA excel instertion formule

5 réponses

Votre réponse

Discussions similaires