Discussion :

[laurentabj]

Bonjour à tous,

Je m'arrache les cheveux depuis un moment sur une insertion de formule.
J'ai une erreur 1004 sur la définition de ma propriété formulaR1C1

Quelqu'un saurait me dire pourquoi ?

Merci à vous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim sommeProfil as double
Dim periOde as integer, c as integer, Gauche as integer, origHaut as integer
 
sommeProfil =...
periOde =...
c =...
Gauche =...
origHaut =...
 
Worksheets("ABC").Cells(origHaut + c + 2 * periOde, Gauche).Select
    With Selection
        .FormulaR1C1 = "=" & sommeProfil & "*R[-28]C"
    End With
...

[Drost]

il ne faudrait pas mettre des parentheses devant et apres tes variables dans ton formula?

Par contre as quoi te sert l'etoile devant ton R[-28]C ?

Tchuss,
Drost

[laurentabj]

Merci Drost, mais c'est pas mieux avec les parenthèses.

l'étoile est mon opérateur de multiplication pour multiplier :

sommeProfil x la cellule pointée par R[-28]C

[Drost]

Essaye peut etre comme ca :

ActiveCell.FormulaR1C1 = "=" & SommeProfil & "*R[-28]C"

Sinon ca doit peut etre venir dans ta selection de cellule^^

[laurentabj]

Je n'ai pas d'amélioration avec ActiveCell.

Pour la selection, je me suis arrêté sur le .select, et c'est bien la bonne cellule qui est sélectionnée.

Je ne comprends rien

[laurentabj]

Je remarque que en declarant sommeProfil as long, ça marche.
Mais pas moyen pour les autres types de données (single, decimal, variant, double)

Problème : je dois utiliser un type de donnée gérant les décimales.

[Drost]

Personnellement, mais je pense que c'est pas bien de faire ca même si je le fait, je ne crée jamais de dim dans mes variables^^

Tu peux peut etre essayé...