Autres VBA => Ne pas prendre une ligne intitulée "Total"

Armand11 · 27 Février 2020

Bonjour à toute la communauté ExcelDownload,

Je suis bloqué sur ma macro, en effet j'arrive bien à compiler tous mes onglets en un seul et unique onglet, en sélectionnant la plage qu'il faut, par contre dans chaque onglet il y a une ligne Total que je souhaite ne jamais récupérer ...
Quelle synthaxe puis je utiliser dans ma macro ?

Je vous joins mon fichier de travail. J'insérerai le bouton de commande plus tard.
Merci d'avance pour votre aide.

Armand
NB : J'ai modifié tous les montants, ce fichier est juste à titre d'exemple, il n'y a pas de données officielles.

patricktoulon · 28 Février 2020

bonjour
pointe le résolu alors

patricktoulon · 27 Février 2020

bonjour
si tes feuilles respectent toujours cette acabit
tout simplement

VB:

 For Each Fe In ThisWorkbook.Worksheets

        If Fe.Name <> "CONSO" Then

            With Fe
                'définie la plage sans la ligne de titres
                Set Plage = .Cells(13, 1).Resize(.UsedRange.Rows.Count - 13, 4)
  '...
  '.....

Armand11 · 28 Février 2020

patricktoulon à dit:
bonjour
si tes feuilles respectent toujours cette acabit
tout simplement

VB:

For Each Fe In ThisWorkbook.Worksheets If Fe.Name <> "CONSO" Then With Fe 'définie la plage sans la ligne de titres Set Plage = .Cells(13, 1).Resize(.UsedRange.Rows.Count - 13, 4) '... '.....

Bonjour Patrick,

Je viens de tester et effectivement ça marche parfaitement !! Merci beaucoup pour votre aide car je dois au final compiler 80 fichiers du même type. Grâce à cette Macro cela va être extrêmement rapide.

Excellente journée à vous et très bon week end Patrick

Merci encore à la communauté EXCELDOWNLOAD...

patricktoulon · 28 Février 2020

bonjour
pointe le résolu alors

Armand11 · 28 Février 2020

Bonjour Patrick, comment je dois faire pour le pointer "Résolu" ?
Désolé et merci encore

Armand11 · 28 Février 2020

C'est bon ! j'ai trouvé un Tuto ....
Merci encore Patrick.

Armand

patricktoulon · 28 Février 2020

tu a deux solutios
soit
dans la réponse qui te convient tu a " marquer comme solution
soit tu réédite ton premier message tu clique sur l’extension que tu a donner au départ (ici "Autre") et clique résolu

Autres VBA => Ne pas prendre une ligne intitulée "Total"

Armand11

XLDnaute Occasionnel

Pièces jointes

patricktoulon

patricktoulon

XLDnaute Barbatruc

Armand11

XLDnaute Occasionnel

patricktoulon

XLDnaute Barbatruc

Armand11

XLDnaute Occasionnel

Armand11

XLDnaute Occasionnel

patricktoulon

XLDnaute Barbatruc

Discussions similaires