IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

[VBA-E] somme d'une plage dynamique


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé Avatar de Ania
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 40
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 155
    Par défaut [VBA-E] somme d'une plage dynamique
    Bonjour à tout le monde

    Je souhaite faire la somme d'une plage sur une même colonne, mais je souhaite que le résultat s'écrive sous forme de formule comme ci-dessous

    Sachant que les cellule F15 et F25 peuvent changer
    afin que que l'on puisse ajouter d'autres éléments

    n'hésitez à me demander plus d'information si ce n'est pas assez clair.

  2. #2
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Il faut que tu fasses une macro

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
        NoPremièreLigne= 15 'si c'est la première ligne renseignée... 
        NoDernièreLigne= Range("F65535").End(xlUp) 
        MaPlage = Cells(NoPremièreLigne, 6).Address + ":" + Cells(NoDernièreLigne-1, 6).Address ' NoDernièreLigne-1 car la dernière ligne contient "déjà" la formule
        MaFormule = "=somme(" + MaPlage + ")" 
        Cells(NoDernièreLigne, 6).Formula = MaFormule
    Attention : NoDernièreLigne-1 seulemant quand ta formule existe déjà

    A+

  3. #3
    Membre chevronné
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    290
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Septembre 2005
    Messages : 290
    Par défaut
    Bonsoir,
    Pour faire la somme de F15:F25, le résultat ici sera dans F26.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    Sub Compter()
    Application.ScreenUpdating = False
        Range("F15:F26").Select
        Range("F26").Activate
        ActiveCell.FormulaR1C1 = "=SUM(R[-11]C:R[-1]C)"
        Range("F26").Select
     Application.ScreenUpdating = True
    End Sub
    jpleroisse

  4. #4
    Membre confirmé Avatar de Ania
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 40
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 155
    Par défaut
    Merci a vous 2 pour vos réponses.

    En particulier ouskel'n'or qui répond totalement à ma question.
    Encore merci

    bonne continuation

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2007] Nommer une plage dynamique en VBA
    Par banane87 dans le forum Macros et VBA Excel
    Réponses: 15
    Dernier message: 13/05/2013, 17h37
  2. [VBA-E] Selection d'une plage de données problématique
    Par Fab117 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 12/01/2007, 14h41
  3. Réponses: 2
    Dernier message: 27/09/2006, 19h41
  4. [VBA-E]Tri d'une plage par une colonne
    Par illight dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 07/02/2006, 10h53
  5. [VBA-E] Image d'une plage de cellule
    Par flogreg dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 15/07/2004, 12h30

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo