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 :

Ajout somme dans une autre cellule (impayer) [XL-2007]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2012
    Messages
    12
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 12
    Par défaut Ajout somme dans une autre cellule (impayer)
    Bonjour a tous
    Voila je rencontre un petit problème avec mon fichier.
    Je m'explique mon fichier comporte une colonne 'TOTAL' avec divers tarifs
    hors il vas de soit que sur ma colonne 'date reglement' si restant vide la somme devras etre ajouter dans une cellule 'impayer'.

    Est ce qu'il y'aurais une âme charitable qui pourrais me donne un coup de pouce.
    Je vous joint mon fichier en demo vous comprendrez un peux mieux de ce que je désirerai faire.

    En vous remerciant par avance.

    Cordialement
    Fichiers attachés Fichiers attachés

  2. #2
    Inactif  
    Homme Profil pro
    Inscrit en
    Septembre 2012
    Messages
    1 733
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations forums :
    Inscription : Septembre 2012
    Messages : 1 733
    Par défaut
    Salut,
    Mets ca dans ta case
    = SOMME((F2:F1048576 ="")*A2:A1048576)

    En validation matricielle (tu appuies sur CTRL et SHIFT (les deux touches en bas à gauche) en même temps que tu appuies sur enter.

    Si tu tiens à le faire en macro..

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Sub toto()
    dim i as long
    With Feuil1
    For i = 2 to .range("A1").end(xlDown).row
    If .cells(i,6)=Empty then
    .range("J2")=.range("J2")+.cells(i,1)
    end if
    next i
    end with
    end sub

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2012
    Messages
    12
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2012
    Messages : 12
    Par défaut
    Merci bcp 'EngueEngue'
    J'ai utiliser la formule matricielle qui fonctionne parfaitement.
    Merci aussi pour la formule macro j'essaye d'eviter de mettre trop de macro sur mon fichier mes ca peux toujours servir.
    Tu me sort une grande épine de mon pied merci

    Cordialement

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

Discussions similaires

  1. Inscrit l'adresse d'une cellule sélectionnée dans une autre cellule
    Par Bubale dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/05/2008, 23h26
  2. Copier une cellule dans une autre cellule
    Par zis0907 dans le forum Excel
    Réponses: 1
    Dernier message: 24/04/2008, 19h24
  3. QTableWidget écrire dans une autre cellule
    Par jerome71300 dans le forum Qt
    Réponses: 8
    Dernier message: 12/03/2008, 20h07
  4. Recupere la valeur d'une ComboBox dans une autre cellule
    Par Henricoo dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 01/06/2007, 14h56
  5. [HTML] click lien sur une cellule et page qui s'ouvre dans une autre cellule
    Par mariogarcia dans le forum Balisage (X)HTML et validation W3C
    Réponses: 26
    Dernier message: 24/05/2006, 15h37

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