VBA Acces somme dans Excel

Résolu/Fermé
darkspoilt Messages postés 254 Date d'inscription jeudi 13 janvier 2005 Statut Membre Dernière intervention 10 octobre 2013 - 10 mai 2007 à 17:19
darkspoilt Messages postés 254 Date d'inscription jeudi 13 janvier 2005 Statut Membre Dernière intervention 10 octobre 2013 - 11 mai 2007 à 10:34
Bonjour j'ai un probleme avec une fonction somme mais je ne vois pas du tout ce que c'est. Si quelqu'un peut m'aider je lui en serait reconnaissant

voici le code

mon paste est résolu j'ai un autre souci

xls.ActiveSheet.Cells.Range("C2:J4").Select
xls.ActiveSheet.Cells.Range("C4").Activate
xls.ActiveSheet.ActiveCell.FormulaR1C1 = "=SUM(R[-2]C:R[-1]C)"


Merci d'avance
A voir également:

5 réponses

xjl Messages postés 232 Date d'inscription mardi 27 mars 2007 Statut Membre Dernière intervention 12 juin 2007 183
10 mai 2007 à 17:42
En fait, comme tu mets ta formule dans une cellule en particulier, le plus simple serait que tu ne code pas l'adresse des cellules que tu veux additionner en relatif mais en absolu, ce qui donnerait dans ce cas:
xls.ActiveSheet.Cells.Range("C2:J4").Select
xls.ActiveSheet.Cells.Range("C4").Activate
xls.ActiveSheet.ActiveCell.FormulaR1C1 = "=SOMME(C2;C3)"
si j'interprète bien ta ligne de départ...
0
darkspoilt Messages postés 254 Date d'inscription jeudi 13 janvier 2005 Statut Membre Dernière intervention 10 octobre 2013 1
10 mai 2007 à 17:50
tu as très bien interprèter ma ligne de départ mais si je l'ai fait en relatif c justement que en absolu cela ne fonctionne pas et je n'aurais meme pas eu besoin de mes deux premiere lignes.
C'est tout la le probleme
Merci de m'aider en tout cas
0
xjl Messages postés 232 Date d'inscription mardi 27 mars 2007 Statut Membre Dernière intervention 12 juin 2007 183
11 mai 2007 à 10:12
Je ne comprends d'ailleurs pas bien l'intérêt de la première ligne...

Normalement, il te suffit de faire:
xls.ActiveSheet.Cells.Range("C4").Select
xls.ActiveSheet.ActiveCell.FormulaR1C1 = "=SOMME(C2;C3)"
et ça devrait te mettre =SOMME(C2;C3) dans C4, à moins que ce ne soit pas ce que tu veux faire, je ne vois pas pourquoi ça ne fonctionnerait pas !
0
darkspoilt Messages postés 254 Date d'inscription jeudi 13 janvier 2005 Statut Membre Dernière intervention 10 octobre 2013 1
11 mai 2007 à 10:19
En fait la premiere étaient présentes pour additioner en relatif. les lignes que tu m'a donné sont les première que j'ai écrite avant les modifications et cela ne fonctionne pas et moi aussi je ne comprends pas pourquoi c'est pour cela que je demande de l'aide sur le forum.
Il me met que l'objet ne connait pas ou ne peux pas utiliser cette méthode.
Merci en tous cas pour ton aide
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
darkspoilt Messages postés 254 Date d'inscription jeudi 13 janvier 2005 Statut Membre Dernière intervention 10 octobre 2013 1
11 mai 2007 à 10:34
une ligne suffisait

voila

xls.ActiveSheet.Cells.Range("C4").FormulaR1C1 = "=SUM(R[-2]C:R[-1]C)"

Merci pour l'aide mais je ne comprends toujours pas pourquoi cela ne fonctionnais pas avant.
Bon c'est pas grave mon probleme est résolu c'est l'essentiel :)
0