Я хотел бы ссылаться на данные из горизонтали и выводить в вертикальную ячейку без пробела между ними.Могу ли я узнать, как использовать формулу OFFSET для достижения желаемого результата по вертикали?
Введите =OFFSET($H$2,0,3*(ROW()-6)) в E6 и заполните, чтобы получить результат, показанный на вашем изображении.
=OFFSET($H$2,0,3*(ROW()-6))
попробуйте это!Измените диапазон (), если вам нужно!
Sub macro() 'Variable declaration Dim tbl As Range Dim col1 As Variant col1 = Array(1, 3, 5, 7) Set tbl = Range("A1:A4") With tbl .Value = Application.Transpose(col1) End With End Sub