Discussion :

[Phil333250]

Bonjour à toutes et tous,

Le tableau que j'exploite est une extraction (en xlsx) issue d'un outil développé par une collectivité territoriale.
Pour le travailler, j'en fais une importation (par macro) dans mon fichier nommé "Contrôle".
Les données contenues dans ce tableau augmentent tous les jours. De ce fait, mon nombre de lignes également.
Le tableau contient 120 colonnes.
Je dois totaliser plus de 110 colonnes et ce tous les jours.
Je cherche donc à automatiser cette procédure.

Dans un premier temps, dans la colonne G je cherche la dernière ligne utilisée et je sélectionne la suivante.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim DercelG As Long 'G pour colonne G
    DercelG = Cells(Rows.Count, 7).End(xlUp).Row   '7 = colonne G
    Cells(DercelG + 1, 7).Select 'Sélectionne la première cellule vide suivante à la dernière cellule utilisée dans G
 
    ActiveCell.FormulaR1C1 = "=SUM(R[-304]C:R[-1]C)"

Là où je bloque, c'est pour la fonction SUM. Je ne sais pas comment automatiser "[-304]" sachant que c'est cette valeur qui va varier.

Il ne me restera plus qu'à étirer le calcul sur toutes les autres colonnes.
Merci pour votre aide.

Philippe

[Invité]

Bonjour,

En mettant votre ligne de totalisation au dessus de la ligne de titre et en transformant votre tableau en tableau structuré, vous n'auriez-vous pas besoin de VBA.

[rvtoulon]

Bonjour la suggestion de Eric KERGRESSE est judicieuse.
toutefois pour répondre à ta question:

Je ne sais pas comment automatiser "[-304]" sachant que c'est cette valeur qui va varier.

je ferai:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaR1C1 = "=SUM(R[-" & DercelG & "]C:R[-1]C)"

@+

[Pierre Fauconnier]

Salut.

Perso, j'utiliserais Power Query pour récupérer les données, et je mettrais une ligne de total au tableau structuré résultant => pas besoin de formules, il suffit de sélectionner le résultat souhaité dans la ligne de total. En tout cas, pas du tout besoin de VBA pour cela (et heureusement, sinon Excel serait vraiment un très mauvais outil)

[Phil333250]

Bonjour messieurs

Merci pour vos réponses.
Bonne journée
Philippe