Microsoft 365 Faires apparaitre dans une feuille EXCEL les 20 dernières ligne d'un gros tableau

R@chid

XLDnaute Barbatruc

Supporter XLD

• 7 Janvier 2021

• #2

Bonjour,
une proposition via Power Query.

Voir PJ


Cordialement

 

Pièces jointes

• Dominic74_PowerQuery_V1.xlsm

  37.7 KB · Affichages: 8

Vote positif 0 Vote négatif

D

Dominic74

XLDnaute Nouveau

• 7 Janvier 2021

• #3

Merci beaucoup, c'Est très efficace, et très apprécié, mais plutôt difficile à ajuster dans une tableau autre, car celui ci était un exemple, je recherche à voir un tuto sur comment reproduire ce type de power query, auriez vous des références ? ou une autre solution à me proposer ?

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 7 Janvier 2021

• #4

Bonjour DOMINIC74, R@CHID,
Bonne année à tous les 2.
R@chid, je n'ai pas encore regardé ta solution avec PowerQuery (que je ne maitrise pas du tout), alors j'ai fait ce truc.
En espérant que cela corresponde à la demande
@+ Lolote83

 

Pièces jointes

• Copie de DOMINIC74 - 20 dernières lignes.xlsm

  35.3 KB · Affichages: 6

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 7 Janvier 2021

• #5

Re bonjour,
A lire trop vite on oublie certaines données.
C'est encore grâce à toi R@chid, que j'ai vu que j'avais mal lu.

J'aimerais avoir dans mon tableau résumé, la ligne 1,2 ainsi que les 20 dernières lignes du tableau

Cliquez pour agrandir...

Du coup, j'ai corrigé ici
@+ Lolote83

 

Pièces jointes

• Copie de DOMINIC74 - 20 dernières lignes.xlsm

  35.6 KB · Affichages: 4

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 7 Janvier 2021

• #6

Re bonjour,
Une version V2 avec un nouvel onglet utilisant simplement la fonction INDIRECT
Cordialement
@+ Lolote83

 

Pièces jointes

• Copie de DOMINIC74 - 20 dernières lignes-V2.xlsm

  41.5 KB · Affichages: 2

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 7 Janvier 2021

• #7

Bonjour à tous

Une version spécifique 365 avec une seule formule après recopie des lignes 1 et 2

A noter que j'ai renommé le tableau source (je ne supporte pas les noms autos)
et modifié la formule pour respecter la norme d'une formule homogène sur la colonne d'un tableau structuré

 

Pièces jointes

• FEUILLE Test_365.xlsm

  30 KB · Affichages: 9

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2021

• #8

Bonjour Dominic74, R@chid, Lolote83, chris,

Voyez le fichier joint et cette macro dans le code de la dernière feuille :

VB:

Private Sub Worksheet_Activate()
Dim dercel As Range
Application.ScreenUpdating = False
Feuil1.[A:E].Copy [A1] 'cooier-coller
Rows.RowHeight = 20.25
Set dercel = [A:E].Find("*", , xlValues, , xlByRows, xlPrevious)
If dercel Is Nothing Then Exit Sub
Columns(5).Resize(dercel.Row) = Columns(5).Resize(dercel.Row).Value 'supprime les formules
If dercel.Row > 22 Then Rows(3).Resize(dercel.Row - 22).Delete
End Sub

Elle se déclenche quand on active la feuille.

Cela dit il faudrait peut-être revoir le classement des dates dans la 1ère feuille, non ?

Car actuellement c'est un peu le foutoir.

A+

 

Pièces jointes

• __FEUILLE Test(1).xlsm

  34.4 KB · Affichages: 3

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 7 Janvier 2021

• #9

Re bonjour à tous,

@Chis, j'ai regardé ta formule et c'est effectivement une autre approche que je ne connaissait pas.

Par contre, tu as fait comme moi au début, tu as lu un peu vite car tu as extrais uniquement les 20 dernières données alors que la demande concernait non seulement les lignes 1, 2 et les 20 dernières.

@job75, idem pour la remarque des lignes sans quoi ton code fonctionne à la perfection.

La demande :

J'aimerais avoir dans mon tableau résumé, la ligne 1,2 ainsi que les 20 dernières lignes du tableau

Cliquez pour agrandir...

C'est la raison pour laquelle, je suis passé par soit un index equiv, soit un indirect.
@+ Lolote83

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2021

• #10

Lolote83 à dit:

@job75, idem pour la remarque des lignes sans quoi ton code fonctionne à la perfection.

Cliquez pour agrandir...

Mon code fait ce qui a été demandé (2+20 lignes).

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 7 Janvier 2021

• #11

Re bonjour Job75
Si je me suis permis de faire cette petite remarque, c'est qu'au final, ce n'est peut être pas les lignes d'entêtes (1 et 2) mais plutôt les 2 premières lignes du tableau (donc 3 et 4) ???? mais peut être n'ai je pas bien ciblé la vrai demande.
Enfin, notre ami @Dominic74 a l’embarras du choix et n'a validé aucune solution.
En fait, c'est en voyant la réponse de R@chid au post#2 avec sa solution de power querry qui m'a mis un doute sur mes propres réponses.
Affaire à suivre.
Bonne journée à toi
@+ Lolote83

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 7 Janvier 2021

• #12

Bonjour @ tous,

Dominic74 à dit:

Merci beaucoup, c'Est très efficace, et très apprécié, mais plutôt difficile à ajuster dans une tableau autre, car celui ci était un exemple, je recherche à voir un tuto sur comment reproduire ce type de power query, auriez vous des références ? ou une autre solution à me proposer ?

Cliquez pour agrandir...

Oui, moi également je trouve difficile de faire à chaque fois des captures d'écran.

Met le curseur dans une cellule de tableau source, va sur "Données / A partir d'un tableau ou d'une plage" et ton tableau va être importé sur PowerQuery.
Sinon, clique sur "Requêtes et connexions", à droite de l'écran clique droit sur l'une des requêtes, puis modifier.

J'ai crée deux requêtes (Connexion uniquement), une pour récupérer les deux premières lignes, la deuxième pour récupérer les 20 derniers lignes, et je les ai regroupées dans une troisième.


Cordialement

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2021

• #13

Lolote83 à dit:

Si je me suis permis de faire cette petite remarque, c'est qu'au final, ce n'est peut être pas les lignes d'entêtes (1 et 2) mais plutôt les 2 premières lignes du tableau (donc 3 et 4) ????

Cliquez pour agrandir...

Ce sont forcément les 2 lignes d'en-têtes 1 et 2 qu'il faut copier.

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 7 Janvier 2021

• #14

Re,

job75 à dit:

Ce sont forcément les 2 lignes d'en-têtes 1 et 2 qu'il faut copier.

Cliquez pour agrandir...

Oui Job75, tu as peut-être raison, il faut juste que le questionneur nous le confirme.

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 7 Janvier 2021

• #15

Bonsoir à tous 🙂,

Surtout pour vous saluer.
Une autre formule en A3 à recopier vers la droite et vers la gauche.

VB:

=INDEX('Feuille Daniel'!A:A;EQUIV(9^99;'Feuille Daniel'!$A:$A)-22+LIGNE())

edit : Bonjour @Lolote83 et bonne année à toi 🙂

 

Pièces jointes

• Dominic74- FEUILLE Test.xlsm- v1.xlsx

  26.7 KB · Affichages: 1

Dernière édition: 8 Janvier 2021

Vote positif 0 Vote négatif