VBA cumulatif dans une colonne

Fermé
A-07 Messages postés 4 Date d'inscription jeudi 30 juin 2022 Statut Membre Dernière intervention 7 juillet 2022 - 30 juin 2022 à 16:48
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 - 7 juil. 2022 à 20:14
Bonjour,

J'aurais besoin d'aide pour effectuer une VBA. J'ai monté une VBA qui fait ajouter une ligne par paie pour mes employés. Mais j'aimerais que la dernière colonne de mon fichier soit le cumule des heures, donc qu'a chaque ajout de ligne, dans ma dernière colonne ça additionne la cellule du haut (qui serait les heures cumulées au total de la dernière paie) + la cellule de droite (les heures faites sur la paie). J'ai une VBA qui fait ajouter une ligne des heures sur la paie, mais j'aimerais que le cumule se calcule toute seule aussi, sans avoir à faire de manipulation. Mon tableau commence en ligne A10 et ma colonne cumule est en D10.

En espérant être claire!
A voir également:

6 réponses

JCB40 Messages postés 2965 Date d'inscription lundi 2 juillet 2018 Statut Membre Dernière intervention 21 décembre 2024 465
30 juin 2022 à 17:15
Bonjour,
Un exemple de votre fichier avec explications serait le bienvenu.
Pour transmettre un fichier,
Veillez à ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Cordialement

0
A-07 Messages postés 4 Date d'inscription jeudi 30 juin 2022 Statut Membre Dernière intervention 7 juillet 2022
5 juil. 2022 à 01:27
Bonjour,

Voici le fichier.

https://www.cjoint.com/c/LGexxheckon

Ce que j'aimerais, c'est que la cellule en jaune fasse le cumule des heures, donc qu'elle additionne la cellule juste au dessus dans la colonne D + les heures de la semaine à droite dans la colonne C. Et à chaque ajout de ligne (donc de semaine).

Merci beaucoup :-)
0
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 2 428
Modifié le 5 juil. 2022 à 21:09
Bonjour

1. sans macro
en D11=SI(D10="";"";SI(C11="";"";D10+C11)) à tirer vers le bas
2 vba
d'abord en D11=D10+C11
puis un truc simple à ajouter à ton code lorsque tu ajoutes une ligne
li = Range("C" & Rows.Count).End(xlUp).Row
Range("D" & li - 1).Copy Range("D" & li)

cdlmnt
0
A-07 Messages postés 4 Date d'inscription jeudi 30 juin 2022 Statut Membre Dernière intervention 7 juillet 2022
7 juil. 2022 à 16:34

Merci de votre réponse! 

Malheureusement, ça ne fonctionne pas... ça me donne un code d'erreur pour la 2e ligne (Range("D" & li - 1).Copy Range("D" & li) ).  Avez-vous une idée du pourquoi ? Je fonctionne par onglet et je dois répéter cette formule pour chaque onglet, est-ce que ça peut-être la cause de l'erreur?

Voici la formule pour chaque onglet:

Ligne = Sheets("Onglet").Range("A8").End(xlDown).Row + 1
Sheets("Onglet_1").Range("A" & Ligne).Value = Sheets("Application").Range("A3").Value
Sheets("Onglet_1").Range("B" & Ligne).Value = Sheets("Application").Range("B3").Value
Sheets("Onglet_1").Range("C" & Ligne).Value = Sheets("Application").Range("C7").Value
Ligne = Range("C" & Rows.Count).End(xlUp).Row
Range("D" & Ligne - 1).CopyRange ("D" & Ligne)

Merci beaucoup pour votre aide :)

0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 2 428
7 juil. 2022 à 16:44

Bonjour

Essaies ceci

Ligne est la dernière cellule remplie colonne C de la feuille Sheets("Onglet_1"). qui doit (en principe) contenir la formule à copier

Ligne = Sheets("Onglet_1").Range("C" & Rows.Count).End(xlUp).Row
Sheets("Onglet_1").Range("D" & Ligne - 1).Copy Sheets("Onglet_1").Range ("D" & Ligne)

Cdlmnt

0
A-07 Messages postés 4 Date d'inscription jeudi 30 juin 2022 Statut Membre Dernière intervention 7 juillet 2022
7 juil. 2022 à 18:01

Ça fonctionne!!!!!! Merci beaucoup !!!!!!

0
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 2 428
7 juil. 2022 à 20:14

De rien

Si c'est fini, peux tu mettre le sujet à résolu (en haut dans ton premier message > les trois petits points)

Cdlmnt

0