comment introduire des variables dans .Formula= ???

albert · 5 Juillet 2004

Bonjour à tous et à toutes, forumiens, forumiennes,

J’écris une formule excel en F4 pendant que l’enregistreur de macros suit ma procédure
(Macro K) : j’obtiens le résultat recherché
puis je tente d’introduire des variables dans cette formule

Mais FormulaR1C1 n’admet pas les variables. Je tente donc de résoudre avec .Formula =

(Macro K bis)
… Les formules s’écrivent en texte

comment résoudre cette difficulté ????

merci d’avance

Sub Kbis()
debut = 4
m = Range("E4:E17")
Range("F4").Select
ActiveCell.Formula = "($E& debut &-MIN(m))/(MAX(m)-MIN(m))*100"

Range("F4").Select
Selection.AutoFill Destination:=Range("F4:F18"), Type:=xlFillDefault

End Sub

@+Thierry · 5 Juillet 2004

Salut Albert, le Forum

Je n'ai pas vu toon fichier joint mais pour écrire des Formules par VBA avec intégration de Variables il faut s'y prendre autrement. Une démo sera plus simple qu'un long discours...

=> Lien supprimé

Bon Appétit
@+Thierry

albert · 5 Juillet 2004

merci @+Thierry,
je regarde tout de suite

(j'ai peiné là-dessus tout le w.e)

Arnaud · 5 Juillet 2004

salut,

ta variable dois tout simplement être en dehors des guillemet car la elle est considérée comme du texte.

ActiveCell.Formula = "($E" & debut & "-MIN(m))/(MAX(m)-MIN(m))*100"

@+Thierry · 5 Juillet 2004

Salut Arnaud, re Albert

Attentention un poil rapidos sur ce coup là Arnaud !

Moi je pense que tu as zappé deux trucs, le "=" et la Variable "m " dans la foulée !! lol, Je proposerai ceci ...

Sub AlbertFormula()
Dim debut As Byte
Dim m As String

debut = 4
m = Range("E4:E17").Address

ActiveCell.Formula = "=($E" & debut & "-MIN(" & m & "))/(MAX(" & m & ")-MIN(" & m & "))*100"

End Sub

Bon App
@+Thierry

albert · 5 Juillet 2004

merci mille fois, @+Thierry et Arnaud,
ça marche au poil
en effet, avec m, je peux me permettre de prendre des plages variables

cordialement
albert

albert · 6 Juillet 2004

Bonjour @+Thierry, Arnaud, forumiens et forumiennes,

j'ai essayé d'obtenir des références relatives...

Range("F4").Formula = "=($E" & debut & "-MIN(" & m & "))/(MAX(" & m & ")-MIN(" & m & "))*100"

j'ai retiré $

Range("F4").Formula = "=(E" & debut & "-MIN(" & m & "))/(MAX(" & m & ")-MIN(" & m & "))*100"

mais pour la suite ???
& debut & : & fixe les cellules, on ne peut les retirer ???

Comment puis-je obtenir des références relatives dans les formules vba ?

merci d'avance
albert

comment introduire des variables dans .Formula= ???

albert

Guest

Pièces jointes

@+Thierry

Guest

albert

Guest

Arnaud

Guest

@+Thierry

Guest

albert

Guest

albert

Guest