Erreur dans ma formule

bonjour a tous

j'ai une erreur que je ne trouve pas

ActiveCell.FormulaR1C1 = "=R[1]C*cdbl(T5.text)"

m'affiche =AP2*cdbl(T5.text)

dans cette formule je cherche a afficher le résultat de cette opération (=AP2*4,5) 4,5 étant le résultat d'un textbox nommé T5

j'ai beau essayer je ne trouve pas comme faire

amicalement

Bonjour,

   ActiveCell.FormulaR1C1 = "=R[1]C*" & CDbl(T5.Text)

Cordialement.

re

merci de ta reponse mais cela ne fonctionne pas

message: erreur définie par l'application ou par l'objet

amicalement

Tout ce que je peux faire, c'est écrire ta formule selon une syntaxe de formule !

Si erreur 1004 (=erreur Excel), il faut le voir dans le fichier !

Cordialement.

re

voici un fichier exemple pour mieux comprendre mon problème

amicalement

3essai.xlsm (21.94 Ko)

Bonjour à tous,

sans voir le fichier, je crois que c'est :

ActiveCell.FormulaR1C1 = "=R[1]C" & CDbl(T5.text)

(y'avait l'étoile en trop !)


Edit : j'me suis trompé, l'étoile était bonne ! c'est pour la multiplication,

et j'ai cru qu'ça s'intercalait entre le C et un n° de ligne !

donc ne pas utiliser ma formule au-dessus !

dhany

@teddy33, le forum,

j'ai quand même téléchargé ton fichier ; je te le retourne modifié :

5essai.xlsm (22.44 Ko)

tu pourras voir que j'ai mis une autre formule.

dhany

Bonjour,

Tu ne peux insérer en B2 une formule faisant appel à B2, tu créerais une référence circulaire...

On suppose donc que c'est en B1 que tu entends insérer ta formule :

Private Sub CommandButton1_Click()
    Sheets("Feuil1").Range("B1").FormulaR1C1 = "=R[" & T1.Value - 1 & "]C*" & T5.Value
    Unload Me
End Sub

Cordialement.

Bonjour MFerrand,

Edit : l'étoile était bonne ! c'est pour la multiplication, et j'ai cru qu'ça s'intercalait entre le C et un n° de ligne !


D'autre part, dans le fichier que j'ai retourné à teddy33, j'ai utilisé une formule plus simple :

https://forum.excel-pratique.com/viewtopic.php?p=668513#p668513

dhany

Salut Dhany ! J'ai vu... Je lui ai rétabli une formule en R1C1 pour laisser son éventail ouvert , mais perso je l'aurais faite en style A1 (bien que généralement je répugne un peu à insérer des formules avec VBA...). La formule R1C1 toujours plus enquiquinante à écrire n'acquiert un intérêt que si l'on doit l'insérer sur plusieurs cellules simultanément.

Cordialement.

screen
Rechercher des sujets similaires à "erreur formule"