Verification de formule
Bonjour à tous!
j'aurai volu que l'un d'entre vous corrige ma formule de programme sous VB: on me dit "erreur de compilation, erreur de syntaxe " sur la ligne du Range"j287"
Sub tomtom()
'
' tomtom Macro
' Macro enregistrée le 19/04/2005 par rieusset
'
Dim val1, val2, val3, val4
val1 = Range("A291").Value
val2 = Range("A292").Value
val3 = Range("B291").Value
val4 = Range("B292").Value
Range("I287").Formula = "=SUM(" & val1 & ":" & val2 & ")"
Range("J287").Formula = "=SUMPRODUCT(" & val1 & ":" & val2 & ")*(" & val3 & ":" & val4 & ")/"I287""
End Sub
j'aurai volu que l'un d'entre vous corrige ma formule de programme sous VB: on me dit "erreur de compilation, erreur de syntaxe " sur la ligne du Range"j287"
Sub tomtom()
'
' tomtom Macro
' Macro enregistrée le 19/04/2005 par rieusset
'
Dim val1, val2, val3, val4
val1 = Range("A291").Value
val2 = Range("A292").Value
val3 = Range("B291").Value
val4 = Range("B292").Value
Range("I287").Formula = "=SUM(" & val1 & ":" & val2 & ")"
Range("J287").Formula = "=SUMPRODUCT(" & val1 & ":" & val2 & ")*(" & val3 & ":" & val4 & ")/"I287""
End Sub
5 réponses
-
re...
tompols pourrait tu me réecrire la procédure que tu as écris dans ton dernier message en mettant touten coordonnées relatives afin que je puisse me servir plusieurs fois de la procédure?? -
ContributeurDe rien :-)
A+ -
merci tompols ct exactement ça!
merci pour ton aide !) -
ContributeurRe,
Sub tomtom() ' ' tomtom Macro ' Macro enregistrée le 19/04/2005 par rieusset ' Dim val1, val2, val3, val4 val1 = Range("A291").Value val2 = Range("A292").Value val3 = Range("B291").Value val4 = Range("B292").Value Range("I287").Formula = "=SUM(" & val1 & ":" & val2 & ")" Range("J287").Formula = "=SUMPRODUCT((" & val1 & ":" & val2 & ")*(" & val3 & ":" & val4 & "))/I287" End Sub
Est-ce bien ce que tu voulais ?
Pour info tu avais un pb de guillemets et j'ai rajouté des parentheses pour ta formule (=SOMMEPROD((A1:A5)*(B1:B5))/I287)
A+ -
Contributeur(Re-)Salut,
Quelle formule veux-tu obtenir en J287 ?
A+
