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

XL 2016 Somme automatique d'une cellule sur toutes les feuilles.

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Dam1904
  • 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
D

Dam1904

XLDnaute Nouveau
Bonjour,
J'utilise pour mon travail un petit fichier que je me suis concocté 😉 en m'inspirant du code vba de "JCGL", mais rien ne fonctionne. 🙁
Voici mon problème :
En sachant que le nombre de feuille sera variable à chaque utilisation du fichier, j'aimerais additionner les cellules "B4àB15" et "B18àB22" de chaque feuilles et reporter le total dans la feuille "Quantité" en respectant le nom des articles.
La feuille"Quantité" restera masquée pendant tout le temps de l'encodage et sera appelée en fin d'encodage, via un bouton (associé à un code vba) pour l'appel.
Je parviens à faire la somme totale pour les feuilles existantes (=SOMME('*'!B4), mais il faut que je modifie la formule à chaque fois que j'ajoute une nouvelle feuille.
En pièce jointe un fichier donnant l'idée.
Pourriez-vous m'aider ?
Merci d'avance.
 

Pièces jointes

Trier par date Trier par votes
Bonjour à tous,

Je suis nul en VBA, mais a mon avis, si tu ajoutes une feuille vide après ta dernière feuille et que tu appliques ta formule, elle fonctionne Il suffit de mettre ta nouvelle feuille avant cette feuille vide.

Crdlmt
 
Vote positif 0 Vote négatif
fanfan38 à dit:
Tu clic avec le bouton droit sur le nom de la feuille.
Tu choisis déplacer ou copier et tu la place où tu veux...
A+ François
Cliquez pour agrandir...
D'accord avec toi, mais intégrer cette commande en vba, est-ce possible ?
fanfan38 à dit:
Tu clic avec le bouton droit sur le nom de la feuille.
Tu choisis déplacer ou copier et tu la place où tu veux...
A+ François
Cliquez pour agrandir...

Bonjour,

J'ai trouvé un code vba qui fonctionne pour placer automatiquement la feuille "Quantité" à la fin de mon tableau le voici :

Sub appelquantité()
Dim i As Integer
Sheets("Quantité").Unprotect ("")
Sheets("Quantité").Range("b4:b15").ClearContents
Sheets("Quantité").Range("b18:b22").ClearContents
For Each f In Worksheets
If f.Name <> "Quantité" Then
For i = 4 To 15
Sheets("Quantité").Range("B" & i).Value = Sheets("Quantité").Range("B" & i).Value + f.Range("B" & i).Value
Next
For i = 18 To 22
Sheets("Quantité").Range("B" & i).Value = Sheets("Quantité").Range("B" & i).Value + f.Range("B" & i).Value
Next
End If
Next
Sheets("Quantité").Visible = True
Sheets("Quantité").Activate
For i = 1 To Sheets.Count
Sheets("Quantité").Select
Sheets("Quantité").Move After:=Sheets(i)
Next i
Sheets("Quantité").Protect ("")
End Sub

J'aurais une autre question, sans vouloir abusé 🙂

J'aimerais que l'on puisse valider H8 uniquement par un "V" majuscule et ensuite interdire l'écriture en I8.
Même sénario par I8 : validation uniquement par "X" majuscule.
Je sais que c'est réalisable via la validation de données, je l'ai déjà fait mais je ne parviens pas à le refaire !!!
Encore merci pour votre aide.
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour FANFAN

Je me permets de t'envoyer un fichier pour optimiser le quittancement de nos occupants. Je suis bénévole dans une association Humanitaire (en haut du fichier Excel).

Ca marche, sauf que je souhaiterai sauveharder l 'onglet et pas le fichier en PDF dans le dossier c:\documents et que la sauvegarde du fichier soit égale à NOM = cellule F8 - DATE MOIS = F15, soit exemple FANTINO SAIDA - 082020

Si tu pouvais me faire cela, je serai très heureux, mais également mes camardes bénévoles de l'association.

MERCI PAR AVANCE

CORDIALEMENT
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour FANFAN

Je me permets de t'envoyer un fichier pour optimiser le quittancement de nos occupants. Je suis bénévole dans une association Humanitaire (en haut du fichier Excel).

Ça marche, sauf que je souhaiterai sauvegarder l 'onglet et pas le fichier en PDF dans le dossier c:\documents\ et que la sauvegarde du fichier soit égale à NOM = cellule F8 - DATE MOIS = F15, soit exemple FANTINO SAIDA - 082020

Soit créer une mouvelle macro dans un nouveau module intitulé Excel Downloads, soit modifier macro 2 dans module 3

Si tu pouvais me faire cela, je serai très heureux, mais également mes camardes bénévoles de l'association.

MERCI PAR AVANCE

CORDIALEMENT
JAKES
 

Pièces jointes

Vote positif 0 Vote négatif
fanfan38 à dit:
Parce qu'à ton boulot ils ont interdit les macros
A+ François
Cliquez pour agrandir...

Bonjour François,
Je n'avais pas vu la macro, je pensais simplement que ce n'était qu'une liste déroulante conditionnelle 🙂

Pour la retranscrire dans mon fichier définitif, je dois la placer dans la feuille ou puis-je insérer un nouveau module ?
Encore merci pour votre aide, c'est vraiment sympa de votre part car étant novice en Excel, ça fait vraiment plaisir d'être aidé 😉😉😉
Il est probable que je fasse encore appel à vous !
De fait, dans mon fichier, je compte intégrer d'autres commandes qui permettraient :
  1. Ouvrir des images à l'aide de la visionneuse Windows.
  2. Imprimer.
  3. Sauvegarder au format PDF et envoyer via Outlook.
Bref, j'ai des idées et le temps ....
Bonne journée à vous et au plaisir de lire.
Dam,
 
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

Discussions similaires

M
  • Question Question
Microsoft 365 Comptabilité : Création d'un fichier automatique d'analyse de comptes
Réponses
2
Affichages
682
Max
M
Z
  • Résolu(e)
Microsoft 365 Récupérer les éléments d'une liste en fonction de leur position
Réponses
2
Affichages
643
Zarnir
Z
T
  • Résolu(e)
Microsoft 365 comment rendre dynamique une feuille synthese qui somme les memes cellules de feuilles differentes
Réponses
14
Affichages
1 K
Hasco
N
  • Question Question
XL 2016 Copie automatique VBA d'une cellule spécifique de toutes les feuilles du classeur
2 3
Réponses
35
Affichages
3 K
Staple1600
J
  • Question Question
Microsoft 365 Récupération de lignes de plusieurs feuille sur une seule en fonction d'une valeur de cellule
Réponses
6
Affichages
2 K
jireu
J
F
  • Question Question
XL 2013 VBA comment obtenir l'équivalent d'une vérification SI(OU sur toutes les feuilles
Réponses
14
Affichages
1 K
vgendron
D
  • Question Question
XL 2016 Supprimer feuilles dans même classeur
Réponses
9
Affichages
1 K
Dam1904
D
E
  • Question Question
XL 2019 VBA Afficher toutes les feuilles et remasquer l'ensemble en fonction d'une variable
Réponses
4
Affichages
1 K
E5kobar
E
J
  • Question Question
Somme d'une cellule avec condition (recherchev) sur toutes les feuilles qui existent ou existeront plus-tard
Réponses
3
Affichages
942
JVOS
J
S
  • Question Question
Synthétiser plusieurs feuilles excel sur une seule feuille sans VBA
Réponses
8
Affichages
3 K
schub
S
M
  • Question Question
XL 2013 Macro pour faire la somme d'une même cellule sur plusieurs feuilles en ignorant les feuilles masquées
Réponses
4
Affichages
1 K
mariebasile
M
C
  • Question Question
Autres Copier valeur cellule variable dans autre feuille sous condition Excel 2007
Réponses
1
Affichages
2 K
claivier_58
C
C
  • Question Question
Autres VBA - Copier valeur cellule variable dans autre feuille sous condition Excel 2007
Réponses
3
Affichages
2 K
claivier_58
C
T
  • Question Question
XL 2016 Macro - Si ajout d'une cellule dans une feuille, recopiage dans les autres feuilles du classeur
Réponses
0
Affichages
655
tetter88
T
G
  • Question Question
XL 2016 Regrouper toutes les lignes d'une série de feuille
Réponses
2
Affichages
965
guigui4901
G
C
  • Question Question
XL 2013 Dans calendrier automatique : interdire l'écriture dans plusieurs cellules selon les termes d'une autre cellule
Réponses
11
Affichages
2 K
job75
M
  • Question Question
XL 2016 Boucler sur toutes les feuilles de tous mes fichiers de façon dynamique
Réponses
2
Affichages
843
melouze
M
O
  • Question Question
Générer des feuilles à partir d'une cellule
Réponses
7
Affichages
2 K
Ozd
O
  • Question Question
XL 2013 [Résolu] Récupération de valeur d'une cellule sur d'autre feuilles a divers endroit
4 5 6
Réponses
86
Affichages
7 K
bellenm
P
  • Question Question
Reprise de cellule sur un fichier fermé en fonction de feuilles différentes
Réponses
0
Affichages
716
pascalito67
P
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…