Jak mogę transponować / formatować takie dane w Excelu - Excel, transpozycja

Dzień dobry wszystkim. Pracuję nad przetestowaniem 10-letnich historycznych cen obligacji. Uprzejmie proszę ten obraz aby lepiej zrozumieć format, który potrzebowałem. Proszę wziąć pod uwagę, że ze względu na dużą liczbę rekordów, z którymi mam do czynienia, uważam, że bardzo uciążliwe jest ręczne formatowanie / transpozycja danych do wymaganych wyników.

Mam nadzieję, że wskażesz mi, jakie podejście muszę podjąć. Dziękuję Ci.

P.S. Aby być przejrzystym dla wszystkich, opublikowałem to pytanie tutaj.

Odpowiedzi:

Zaczynając od danych takich jak:

Uruchamianie tego kodu:

Sub ReMapper()
Dim rw As Long, cl As Long, K As Long
Dim s2 As Worksheet
Set s2 = Sheets("Sheet2")

K = 1
For rw = 6 To 9 "         loop over rows
For cl = 2 To 5 "     loop over columns
s2.Cells(K, "A").Value = Cells(rw, "A").Value
s2.Cells(K, "B").Value = Cells(5, cl).Value
s2.Cells(K, "C").Value = Cells(rw, cl).Value
s2.Cells(K, "D").Value = Cells(4, cl).Value
K = K + 1
Next cl
Next rw
End Sub

nałoży to na siebie Arkusz2:

UWAGA:

1. kod zbiera dane z komórek, które wybrałem
2. pętle przechodzą przez komórki, które sformatowałem pogrubienie
3. stałe numeryczne w kodzie {2, 3, 4, 5, 6, 9} zależy od wielkości i położenia danych źródłowych.