![]() |
Excel | преобразовать строку в столбец
Как в экселе строку преобразовать в столбец?
|
Справочку по Ёкселю надо внимательней читать! Вот что она говорит:
Транспонирование строк в столбцы или столбцов в строки Данные из верхней строки области копирования отобразятся в левом столбце области вставки, и, соответственно, данные из левого столбца копируемой области отобразятся в верхней строке области вставки. Выделите ячейки, которые требуется транспонировать. Нажмите кнопку Копировать . Выделите левую верхнюю ячейку области вставки. Область вставки не должна накладываться на область копирования. Нажмите стрелку справа от кнопки Вставить , а затем установите флажок транспонировать |
Цитата:
Стало быть пишем на VBA: Public Sub Transpos(x As Integer, y As Integer) Dim t As Integer Do While t < 256 t = t + 1 If t = x Then z = ActiveSheet.Cells(x, t).Value: GoTo 1 ActiveSheet.Cells(t, y).Value = ActiveSheet.Cells(x, t).Value 1 ActiveSheet.Cells(x, t).ClearContents Loop ActiveSheet.Cells(x, y).Value = z End Sub Вызываем процедуру откуда надо, например: TransPos 4, 6 считает все данные из строки 4 и запишет их в столбец 6 (F). |
Время: 16:26. |
Время: 16:26.
© OSzone.net 2001-