Formule intégrant des Range au lieu des références de cellules [Résolu]

Messages postés
34
Date d'inscription
mercredi 15 juin 2016
Dernière intervention
30 septembre 2016
-
Bonjour,
je voulais savoir comment faire pour calculer des opérations du genre:
Range("G1").End(xlDown).Offset(1, 0).Select
ActiveCell.FormulaR1C1 = _
"=Range("A1").End(xlDown).Offset(1, 0).value+Range("B1").End(xlDown).Offset(1, 0).value"

je ne peux mettre les références des cellules car je ne peux les connaître à l'avance ca dépendra de comment l'utilisateur remplira la feuille.
Merci bien
Afficher la suite 

Votre réponse

2 réponses

Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Bonjour,
du genre ????
dyjatou92
Messages postés
34
Date d'inscription
mercredi 15 juin 2016
Dernière intervention
30 septembre 2016
-
du genre du code que j'ai tapé.... je voulais savoir en résumé quel est l'équivalent de Range("A1").End(xlDown).Offset(1, 0).value dans une formule de calcul
cs_MPi
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Dernière intervention
23 août 2018
-
Bonjour,

Si je comprends bien...
Dim nbLIgnes as long
nbLignes = Range("A1").End(xlDown) 'Dernière ligne remplie


Il te reste à intégrer la variable à ta formule
ex:
Range("A" & nbLignes + 1).Formula = "=SUM(A2:A" & nbLignes & ")"
Commenter la réponse de ucfoutu
Messages postés
34
Date d'inscription
mercredi 15 juin 2016
Dernière intervention
30 septembre 2016
0
Merci
Bonjour finalement voilà la solution que j'ai trouvé. Merci à tous les membres de ce forum qui ont bien voulu me répondre.
@ CsMPi je vais aussi tester ta solution. Merci
Range("G1").End(xlDown).Offset(1, 0).Select
ActiveCell.Formula = _
"=(" & Range("E1").End(xlDown).Offset(0, 0).Address & ")*(" & Range("F1").End(xlDown).Offset(0, 0).Address & ")/(1000*1.31*10^(-6))"
' la propriété offset peut aussi être enlevée de la syntaxe
Commenter la réponse de dyjatou92

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.