VBA Acces somme dans Excel

Résolu
darkspoilt Messages postés 254 Date d'inscription   Statut Membre Dernière intervention   -  
darkspoilt Messages postés 254 Date d'inscription   Statut Membre Dernière intervention   -
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   Statut Membre Dernière intervention   183
 
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   Statut Membre Dernière intervention   1
 
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   Statut Membre Dernière intervention   183
 
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   Statut Membre Dernière intervention   1
 
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   Statut Membre Dernière intervention   1
 
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