bonjour,
voici une macro Excel qui reformate tes données dans une nouvelle feuille. la feuille "sheet1" doit exister.
Sub aargh()
Set wsi = Sheets("data")
Set wso = Sheets("sheet1")
i = 2
x = 1
wso.Cells(x, 1) = "Series name"
wso.Cells(x, 2) = "Country name"
wso.Cells(x, 3) = "country code"
wso.Cells(x, 4) = "Year"
wso.Cells(x, 5) = "value"
x = x + 1
While wsi.Cells(i, 1) <> ""
sn = wsi.Cells(i, 1)
cn = wsi.Cells(i, 2)
cc = wsi.Cells(i, 3)
j = 4
While wsi.Cells(1, j) <> ""
If wsi.Cells(i, j) <> ".." Then
wso.Cells(x, 1) = sn
wso.Cells(x, 2) = cn
wso.Cells(x, 3) = cc
wso.Cells(x, 4) = wsi.Cells(1, j)
wso.Cells(x, 5) = wsi.Cells(i, j)
x = x + 1
End If
j = j + 1
Wend
i = i + 1
Wend
End Sub