XL 2019 [RESOLU] Tri de plusieur feuilles

Bonjour.

Je ne comprends rien...
Désolé..
On dirait un listing de câble de poste haute tension...
Serait-il possible de m'en dire plus?

tbft à dit:

Bonjour.

Je ne comprends rien...
Désolé..
On dirait un listing de câble de poste haute tension...
Serait-il possible de m'en dire plus?

Cliquez pour agrandir...

Bonjour
Oui en fait ce sont des repères de fil à imprimer sur des plaquettes de couleurs différentes, d'où le tri. Je remplis les feuilles coffret par coffret et après je rassemble tout suivant (tri couleur et vide) les couleurs pour impression. À l'heure actuelle je trie dans les feuilles et colle dans récap et après je supprime le nom du câble qui n'a pas de couleur. Si je pouvais automatisé le tout avec une macro se serais top.

Bonsoir.

Avez-vous essayer les tableaux croisés dynamiques???

tbft à dit:

Bonsoir.

Avez-vous essayer les tableaux croisés dynamiques???

Cliquez pour agrandir...

Bonsoir,
Je ne connais pas du tout le fonctionnement du tableau croisé dynamique mais je vais regarder de ce coté.
Merci pour la piste
Cordialement

Bonsoir

Tenez-moi au courant, s'i vous plait?

Bonsoir tbft
Je viens d’essayer un tableau croisé dynamique, mais avec mes connaissances ça ne fait pas ce que j'ai besoin ( ça tri bien mais en mélange l'ordre). En fait pour faire cour, il faut que je copie toutes les feuilles(B3: F1000) dans une seule et que tri en fonction de sa couleur (F) mais en gardant toujours la ligne où se trouve le "x" en colonne B.
Merci
Cordialement

Bonjour à tous,

Un exemple de regroupement des tableaux avec Power query

JHA

Bonjour ,
PQ résout la fusion à la queue-leu-leu des tables en une seule et ce sans code,
juste bien vérifier la similarité les entêtes pour éviter d'avoir plusieurs colonnes Tri.
Mais cela ne résout toujours pas les problèmes de tri que je n'arrive pas facilement à appréhender .

Ci-joint la version de @JHA avec une colonne supplémentaire permettant de trier les couleurs par groupe de postes .

Pour ceux qui ne sont pas à l'aise avec les étapes de Power Query,
CI-joint la version en Vba ( sur la base des tables structurées )

fanch55 à dit:

Pour ceux qui ne sont pas à l'aise avec les étapes de Power Query,
CI-joint la version en Vba ( sur la base des tables structurées )

VB:

Sub Charge()
Application.ScreenUpdating = False

    [Tabvba].AutoFilter
    If Not [Tabvba].ListObject.DataBodyRange Is Nothing _
    Then [Tabvba].ListObject.DataBodyRange.Delete
 
    For Each T In Array([TableauFil1502], [TableauFil1503], [TableauFil1504], [TableauFil1505])
        [Tabvba].ListObject.ListRows.Add
        T.ListObject.DataBodyRange.Copy
        [Tabvba].ListObject.DataBodyRange.Rows([Tabvba].ListObject.ListRows.Count).PasteSpecial xlPasteValues
        TabName = T.Parent.Name
        [Tabvba].AutoFilter Field:=6, Criteria1:="="
        [Tabvba[Groupe]].SpecialCells(xlCellTypeVisible).FormulaR1C1 = "=IF([@Titre]<>"""",""" & TabName & " ""&[@Nom],INDIRECT(ADDRESS(ROW()-1,COLUMN())))"
        [Tabvba].AutoFilter
        [Tabvba[Groupe]].Value = [Tabvba[Groupe]].Value
    Next
 
    With [Tabvba].ListObject.Sort
        .SortFields.Clear
        .SortFields.Add Key:=Range("TabVba[Groupe]"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .SortFields.Add Key:=Range("TabVba[Nb]"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .SortFields.Add Key:=Range("TabVba[Tri]"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .SortFields.Add Key:=Range("TabVba[Nom]"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    [Tabvba[#All]].Columns.AutoFit

End Sub

Cliquez pour agrandir...

Bonsoir franch55 et JHA

JHA à dit:

Bonjour à tous,

Un exemple de regroupement des tableaux avec Power query

JHA

Cliquez pour agrandir...

Merci
Vraiment super boulot. Impressionnant.Les deux tableaux fons le boulot. Mais, est-il possible que dans les tris quand je choisis une couleur et un vide "il y aura toujours le vide de choisi" il n'y est que le vide de la couleur choisi qui sois affiché ! en fait jamais plus d'un vide à la fois .
le vide est le nom du câble associé à chacun repère de fil et les étiquettes sont imprimées sur des plaquettes de 48 étiquettes"
Cordialement

Bonjour @Bloody_Toad ,

Avec les éléments dont je dispose,
j'avoue ne pas trop comprendre ta demande .

En fait, il faudrait que tu détailles ton processus d'impression à défaut de fournir un classeur exemple.

fanch55 à dit:

Bonjour @Bloody_Toad ,

Avec les éléments dont je dispose,
j'avoue ne pas trop comprendre ta demande .

En fait, il faudrait que tu détailles ton processus d'impression à défaut de fournir un classeur exemple.

Cliquez pour agrandir...

BonsoirFanch55
Merci de ton intérêt .
j'essaierai de te décrire comment je procède, le temps de mettre ça en œuvre parce que je ne suis pas un grand écrivain.
Bonne soirée
Cordialement

Bloody_Toad à dit:

BonsoirFanch55
Merci de ton intérêt .
j'essaierai de te décrire comment je procède, le temps de mettre ça en œuvre parce que je ne suis pas un grand écrivain.
Bonne soirée
Cordialement

Cliquez pour agrandir...

Re
Bonjour fanch55

Je vais essayer d’expliquer ma façon de faire.

Pour faire les étiquette je part d’un schéma papier ou PDF.

Je crée le classeur « étiquette »

Je crée des feuilles différentes avec les noms des coffrets ou de d’armoires (qui est diffèrent suivant les chantiers)

Je choisi en [F2] le « code » qui faire référence a un style d’étiquettes (pour le logiciel de l’imprimante)

Ensuite j’écris le nom du câble en colonne [C] un « x » en colonne ce qui me met en gras le Nom, le souligne et met « 1 » en colonne [D] (Nombre de fois a imprimé pour l’imprimante)

Dessous j’écris le texte du repère de fil [C] et j’écris sa couleur en colonne [F]. (Nombre et code sont automatique)

Autant de feuille qu’il y a d’armoires sur le chantier. Fin de recopiage.

Voilà les manipulations que j’aimerai (si possible) automatisée.

Je crée des feuilles du nom des « couleurs »

Dans chaque feuille d’armoire ou de coffret je tri (coche dans la liste de choix) la couleur et vide. Je copie à la queue leu leu dans la feuille au nom de la « couleur » choisi, je supprime les noms des câbles qui non pas de couleur (et oui j’ai copié tous les vide) et j’insère une ligne vide au-dessus de chaque nom de câble (pour que ce soit plus lisible sur la plaquette d’impression)

A la fin j’enregistre le classeur en xlsx (le logiciel de l’imprimante ne connait pas xlsm) et j’importe via le logiciel de l’imprimante une feuille couleur (colonne [C], [D], [E]) en fonction de la couleur de la plaquette d’étiquette. En fait j’imprime toujours en noir sur des plaquette de couleur.

Et là, à la fin on voie vraiment que je ne suis pas un écrivain dans l’âme .

Merci encore.

Cordialement.

Pouvez-vous me fournir un exemplaire du fichier Xls que vous donnez "à manger" au logiciel d'impression de plaquettes ?