Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

somme avec vba

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion vinc24
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
V

vinc24

Guest
Bonjour

je voudrais effectuer la somme de la plage "D14😀..." dans une cellule situé 3 cellule en dessous de la fin de la plage dont je veux faire la somme
J'ai essayer pas mal de choses, mais je ne comprend pas pourquoi ca ne fonctionne pas. si quelqu'un pouvait m'aider, ca serrais bien venu!

Code: 
Dim x, z
Worksheets(">Planning G + Budget").Range("A14").Select
z = ActiveSheet.Range("A14").End(xlDown).Offset(3, 3).Select

Worksheets(">Planning G + Budget").Range("A14").Select
x = ActiveSheet.Range("A14").End(xlDown).Offset(0, 3).Select
ActiveSheet.Range("D" & z).Formula = "=sum(D14:D" & x & ")"

vincent
 
Trier par date Trier par votes
Re : somme avec vba

Bonjour vinc24, Fred0o,
Comme j'ai fait quelque chose, je le poste:
Code: 
[COLOR=blue]Sub[/COLOR] test()
[COLOR=blue]Dim[/COLOR] z [COLOR=blue]As Long[/COLOR]
z = ActiveSheet.Range("A14").End(xlDown).Row
ActiveSheet.Range("D" & z + 3).Formula = "=sum(D14:D" & z & ")"
[COLOR=blue]End Sub[/COLOR]
Cordialement
 
Vote positif 0 Vote négatif
Re : somme avec vba

Bonsoir vinc24,

Je sais bien que débuter en VBA c'est dificile, c'est pourquoi, malgré tes explications et le code fourni, c'est pas évident de comprendre ton projet.

Fait donc l'effort de placer un petit fichier avec les éléments de ton projet et, en particulier, le résultat à obtenir bien précisé.
 
Vote positif 0 Vote négatif
Re : somme avec vba

Bonsoir,

A tester:
Code: 
[COLOR=blue]Private[/COLOR] [COLOR=blue]Sub[/COLOR] UserForm_Click()
    [COLOR=blue]Dim[/COLOR] z [COLOR=blue]As[/COLOR] [COLOR=blue]Long[/COLOR], x [COLOR=blue]As[/COLOR] [COLOR=blue]Long[/COLOR]
    [COLOR=blue]With[/COLOR] Worksheets([I]">Planning G + Budget"[/I])
        [COLOR=green]'Dernier numéro de ligne de la colonne A[/COLOR]
        x = .Range([I]"A14"[/I]).[COLOR=blue]End[/COLOR](xlDown).Row
        z = x + 3
        .Range([I]"D"[/I] & z).Formula = [I]"=sum(D14:D"[/I] & x & [I]")"[/I]
    [COLOR=blue]End[/COLOR] [COLOR=blue]With[/COLOR]
[COLOR=blue]End[/COLOR] [COLOR=blue]Sub[/COLOR]
Sans classeur exemple, je n'ai pas vérifier
A+
[Edition] suis à la bourre moi;-) salut à tous
 
Vote positif 0 Vote négatif
Re : somme avec vba

Merci a tous
le code de Efgé fonctionne très bien

Est-il possible de faire la somme d'une cellule sur deux?
je met un fichier simplifier en pièce jointe

Le résultat est voulu en F10, mais la longueur du tableau varie, ce n'est donc pas une simple addition

vincent
 

Pièces jointes

Vote positif 0 Vote négatif
Re : somme avec vba

Re à tous
vinc24 à dit:
Est-il possible de faire la somme d'une cellule sur deux?
Cliquez pour agrandir...
Il ne s'agit donc plus de la même demande...

vinc24 à dit:
je met un fichier simplifier en pièce jointe
vincent
Cliquez pour agrandir...
Simplifié à quel point? toutes les cellules sont en erreure.

vinc24 à dit:
Le résultat est voulu en F10, mais la longueur du tableau varie, ce n'est donc pas une simple addition
Cliquez pour agrandir...

De quel tableau parles tu ?

[😡]Tu sais poster quand tu as besoin de quelque chose, mais tu oublis de préciser quand les propostions te conviennent...[/😡]

Enfin bref, ras le bol, je jette l'éponge.
Bon courage
Cordialement
 
Vote positif 0 Vote négatif
Re : somme avec vba

Encore merci a tous pour votre aide

Et désolé d'avoir été aussi peu claire, ou d'avoir créer un nouveau sujet dans le sujet.

Je ne pensais pas que cela poserais problème.


Efgé à dit:
[😡]Tu sais poster quand tu as besoin de quelque chose, mais tu oublis de préciser quand les propostions te conviennent...[/😡]
Cliquez pour agrandir...

Consternant l'autre sujet (que je n'ai toujours pas résolu), je viens de voire votre réponse, je vous dirais bien évidement si votre poste a répondu a mes attentes.

cordialement

vincent
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

M
  • Question Question
XL 2021 macro VBA
Réponses
4
Affichages
586
ManuEven
M
G
  • Résolu(e)
XL 2021 Transformer une formule en vba
2
Réponses
20
Affichages
1 K
kiki29
C
  • Résolu(e)
XL 2016 Répartir dans des Groupes d'Effectifs Aléatoires ... mais pas trop
Réponses
2
Affichages
595
crocrocro
C
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
870
piga25
  • Question Question
XL 2021 Exportation feuille msgbox yes no avec module Thisworkbook
2
Réponses
21
Affichages
2 K
Nicolas JACQUIN
T
  • Question Question
XL 2016 Optimisation d'une boucle
2 3
Réponses
30
Affichages
2 K
thivame
T
G
  • Question Question
Microsoft 365 Export données d'une listview
Réponses
5
Affichages
748
GClaire
G
P
  • Résolu(e)
XL 2016 4 étapes en 1 seule Excel vba
Réponses
4
Affichages
931
Pygos691
P
B
  • Question Question
Microsoft 365 Additionner des cellules même ligne en userform vba
Réponses
13
Affichages
968
sousou
A
  • Question Question
Microsoft 365 Macro : Somme automatisée sur plusieurs feuilles.
Réponses
2
Affichages
1 K
AntoineLTO
A
C
Excel : Fusionner des cellules en conservant le contenu et la police des cellules à fusionner
Réponses
5
Affichages
923
crocrocro
C
M
  • Résolu(e)
XL 2016 Filtre auto VBA
Réponses
3
Affichages
1 K
MickaeL_D
M
A
  • Résolu(e)
XL 2019 Passage de 2013 pro à 2019 pro, Pb avec formule VBA, liens hypertexte
2 3 4
Réponses
54
Affichages
4 K
sylvanu
Z
  • Question Question
XL 2019 Probleme Rechercher avec copie et offset en VBA
Réponses
1
Affichages
602
vgendron
M
  • Question Question
XL 2013 Envoyer un mail automatique avec le contenu de la bonne ligne
Réponses
2
Affichages
1 K
Oneida
  • Résolu(e)
XL 2021 Faire une copie de mon classeur quand "Target" change
2 3
Réponses
30
Affichages
3 K
Usine à gaz
J
  • Question Question
XL 2019 Ajout d'un bouton fixe vba
Réponses
1
Affichages
709
jui42
J
  • Question Question
Microsoft 365 Copier et coller formes sans changer de feuille
Réponses
2
Affichages
729
Chasse
D
  • Question Question
XL pour MAC somme dans macro
Réponses
5
Affichages
546
Delorme
D
I
  • Résolu(e)
Microsoft 365 VBA EXCEL Utilisation d'une variable avec données dans un tableau
Réponses
4
Affichages
1 K
mapomme
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…