Транспортировать столбцы в порядке, используя Excel VBA

Question

У меня очень большой объем данных необходимо транспонировать в порядке, используя пример на изображении ниже. Левая часть изображения - это то, как информация поступает из отчета, а правая сторона - то, что мне нужно, чтобы выглядеть.

Я попытался использовать специальную вставку Transpose, но это приводит к 3000 + столбцам информации. Я также пробовал сводные таблицы, но я получаю информацию не в порядке.

Три части «Информация» предназначены для каждого сотрудника. Поскольку он стоит сейчас, линии вертикальны, но в нашем конечном результате у нас должно быть три строки на одного сотрудника.

Transpose Left Original Data Right Outcome Needed

Answer 1

вы можете достичь этого по следующей формуле

F1 = INDEX($A$1:$A$3,1+QUOTIENT(ROW()-ROW($F$1),3)) 

G1 = VLOOKUP(F1,$A$1:$D$3,2+MOD(ROW()-ROW($F$1),3),FALSE) 

Так что если у вас есть 3000 строк данных, формула должна быть втянута до 9000 строк.