recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

phlaurent55

Nous a quittés en 2020

Repose en paix

• 4 Juin 2011

• #2

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Bonjour fralap,

ton fichier en retour

à+
Philippe

 

Pièces jointes

• 111.xlsm

  23.5 KB · Affichages: 581
• 111.xlsm

  23.5 KB · Affichages: 601
• 111.xlsm

  23.5 KB · Affichages: 596

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 4 Juin 2011

• #3

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Bonsoir le fil 🙂,
Via VBA

Code:

Sub Test()
Dim Feuille As Worksheet, I As Integer, J As Integer
J = 6
For Each Feuille In ThisWorkbook.Worksheets
If Feuille.Name <> "recapitulatif" Then
For I = Feuille.Range("A:A").Find("nom", lookat:=xlWhole).Row + 1 _
    To Feuille.Range("D:D").Find("Totaux", lookat:=xlWhole).Row - 1
Sheets("recapitulatif").Range("A" & J & ":G" & J).Value = Feuille.Range("A" & I & ":G" & I).Value
J = J + 1
Next I
End If
Next Feuille
End Sub

Je regarde la proposition de Philippe 😛...
Bonne soirée 😎
Ajout : Je viens de regarder le code de Philippe, c'est marrant comme nos 2 codes peuvent différer, tout en étant aussi efficaces l'un que l'autre 😉

 

Dernière édition: 4 Juin 2011

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 4 Juin 2011

• #4

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Re,

Attention Jean-Noël pour les cas où " nom " se trouverait plus haut dans la colonne

c'est pour cela que je recherche " couleur "

Bon , il faudra que j'aie un peu plus souvent le réflexe d'utiliser Find

à+
Philippe

 

Vote positif 0 Vote négatif

F

fralap

XLDnaute Nouveau

• 4 Juin 2011

• #5

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Merci pour la rapidité de vos réponses!
je vais potasser cela
Bonne soirée

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 5 Juin 2011

• #6

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Re 🙂,
Après une intense collaboration avec David84 (vous savez, type chef de chantier pour moi, ouvrier pour lui 😛... En bref, j'ai eu l'idée de passer par des Indirect et des SommeProd pour récupérer les adresses des lignes, et lui vous a peaufiné tout ça 🙄...), une proposition tout en formule (à part une fonction MacroXL4 qui peut être éliminée si tous les onglets sont bien nommés Feuille1 à Feuille6 par exemple, avec ="Feuille"&LIGNES($1:1) à glisser vers le bas).
Bon dimanche 😎

 

Pièces jointes

• bordereau_0511_V3.xls

  89 KB · Affichages: 407

Vote positif 0 Vote négatif

F

fralap

XLDnaute Nouveau

• 5 Juin 2011

• #7

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

bonjour,
bonne idée de passer par les formules matricielles, il suffit d'inserer la feuille et le tableau apparait,cependant un essai sur 27 feuilles montre que sur certaines est recopiée aussi la ligne des totaux (Nombre:, Totaux) a la place ou en plus des (de la) ligne(s) des noms.19 fois sur 27 feuilles et 84 enregistrements sans que j'en vois la raison.
Cdt

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 5 Juin 2011

• #8

Re : recuperer les lignes de tableaux placés dans plusieurs feuilles d'un classeur

Bonjour,

bonne idée de passer par les formules matricielles

Cliquez pour agrandir...

La plupart, notamment celles ramenant les valeurs dans le tableau récapitulatif ne sont pas matricielles. C'est justement ce qui rend le fichier opérationnel en terme de vitesse de traitement.

un essai sur 27 feuilles montre que sur certaines est recopiée aussi la ligne des totaux (Nombre:, Totaux) a la place ou en plus des (de la) ligne(s) des noms

Cliquez pour agrandir...

Si cela fonctionne sur 6 feuilles sur ton fichier exemple, il n'y a pas de raison pour que cela ne fonctionne pas sur 27 feuilles, sauf si ton fichier réel diffère dans sa construction de ton fichier test, par exemple si tu as des cellules non vides en colonne C au-dessus de tes tableaux ou si la ligne des totaux de tes tableaux comporte des données en colonne C, ou si tu n'as pas laissé la 1ère ligne vide dans la feuille "récapitulatif" ou si la feuille "récapitulatif" ne s'appelle pas exactement comme cela, etc. (mais sans fichier, difficile de t'aiguiller).
A+

 

Vote positif 0 Vote négatif