Somme de chiffres dont la position change dans une plage

Résolu
Julien44 -  
 Julien44 -
Bonjour,

Dans une plage A1 : A1000, du haut vers le bas, sont inscrits des chiffres sur une partie de la plage (exemple : A1:A100 remplie; A101:A1000 vide). Régulièrement des chiffres s’ajoutent en-dessous de ceux existant.
L’objectif est que s’inscrive en A2 la somme des 10 derniers chiffres ajoutés dans la plage A1:A1000 (exemple : si A1:A100 remplie alors A2 affiche la somme de A91:A100; si A1:A101 remplie alors A2 affiche la somme de A92:A101).
L’un d’entre vous pourrait-il me procurer le code VBA nécessaire ?

Merci

3 réponses

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    Avec la fonction Somme, cela devrait te donner ton résultat :
    [A2] = Application.WorksheetFunction.Sum(ActiveSheet.Cells(Cells(Rows.Count, "A").End(xlUp).Row - 9, "A").Resize(10, 1))
    0
  2. Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
     
    Bonjour

    il ne semble pas utile de passer en VBA
    si votre tableau commence en A1:

    =SOMME(DECALER(A1;NBVAL(A:A)-1;;-10))

    devrait faire l'affaire

    crdlmnt
    0
  3. Julien44
     
    Bonjour gbinforme et Vaucluse

    Merci pour ces réponses qui me conviennent tout a fait.

    Cordialement
    0