XL 2019 Concatener et tableau matriciel

[Saumon80]

Bonjour ,

J ai un tableau de ce type avec des valeurs correspondant au croisement des colonnes et lignes .
Je souhaiterai pouvoir extraire une liste en contenant les valeurs gauche colonne A et ligne 1 et pouvoir retrouver la valeur correspondante .

Par exemple A-lille = 2 ,B-lille = 1 ,.... et avoir une liste avec la valeur correspondante pour tous les croisement de données mais ne sait pas comment m y prendre .

Merci d'avance pour votre aide .

	Lille	Lyon	Paris	Marseille
A	2	44	3	56
B	1	45	2	4
C	4	5	66	77
D	44	54	45	77

 

[R@chid]

Bonjour,
avec Power Query, voir PJ

Cordialement

 

[chris]

Bonjour

Une proposition PowerQuery (intégré à Excel)

 

[soan]

Bonjour Saumon80, le fil,

tu peux voir que "Feuil2" est vide ; va sur "Feuil1" et fais Ctrl e ➯ travail effectué ! 😊

note importante : ça marchera aussi bien si tu ajoutes des lignes, et même si tu ajoutes des colonnes ; cela sans rien avoir à changer dans le code VBA.​

Option Explicit

Sub Essai()
  If ActiveSheet.Name <> "Feuil1" Then Exit Sub
  Dim a%: a = Cells(1, Columns.Count).End(1).Column: If a = 1 Then Exit Sub
  Dim b&: b = Cells(Rows.Count, 1).End(3).Row: If b = 1 Then Exit Sub
  Dim T, v%, i%, j&, k&: T = [A1].Resize(a, b): k = 1
  Application.ScreenUpdating = 0
  With Worksheets("Feuil2")
    .Columns(1).ClearContents
    For j = 2 To a
      For i = 2 To b
        v = T(i, j)
        If v > 0 Then
          .Cells(k, 1) = T(i, 1) & "-" & T(1, j) & " = " & v: k = k + 1
        End If
      Next i
    Next j
    .Select
  End With
End Sub

si besoin, tu peux demander une adaptation.
à te lire pour avoir ton avis. 😉

soan

 

[soan]

Bonjour,

toujours pas d'retour de Saumon ?

j'espère qu'il s'est pas fait attraper par un ours
en remontant la rivière ! 😁 😜

🐻 🐟

la route du frai est la route de tous les dangers ! 😭

NB : y'a pas d'faute de frappe : « frai », pas « fret » !

soan

 

[JHA]

Bonjour à tous,

Autre proposition de listes

JHA