Associer colonne A aux suivantes et mettre résultats sur autre feuille

Bonjour, j'aimerais associer ma colonne A avec les autres et créer un nouveau tableau avec seulement 2 colonnes sur une autre feuille. J'ai beaucoup de données et le nombre est variable, donc je copierais le résultat sur une autre feuille. Voici en haut ce que j'ai et en bas ce que je veux qui apparaisse sur une autre feuille. J'ai joint un fichier. Merci beaucoup!

7test-macro.xlsx (9.37 Ko)
image

Bonsoir à tous !

Et....

Je vous livre une proposition via Power Query (nativement intégré à votre version Excel) :

Bonsoir à tous,

Version macro....

Sub test()
 Dim col As Integer, dercol As Integer
 Dim dl As Integer, derlig As Integer

 Application.ScreenUpdating = False

 Sheets("Feuil2").Cells.ClearContents

  With Sheets("Feuil1")
    dercol = .UsedRange.Columns.Count
        dl = .Range("A1").CurrentRegion.Rows.Count
    i = 2
   Do While i <= dl
     For col = 2 To dercol
      derlig = Sheets("Feuil2").Range("A" & Rows.Count).End(xlUp).Row + 1
       If .Cells(i, col) <> "" Then
        Sheets("Feuil2").Range("A" & derlig) = .Range("A" & i)
        Sheets("Feuil2").Range("B" & derlig) = .Cells(i, col)
       End If
      derlig = derlig + 1
     Next col
    i = i + 1
   Loop
  End With
    Sheets("Feuil2").Activate
End Sub
3test-macro.xlsm (19.90 Ko)

Cordialement,

Merci beaucoup à vous 2!

Tout fonctionne

Rechercher des sujets similaires à "associer colonne suivantes mettre resultats feuille"