Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
Господа, будьте снисходительны, не бросайтесь сразу штрафовать за, как вам кажется, глупые вопросы - beginners на то и beginners.
Как в VBA из массива записей сделать выборку на другой лист? 17.05.05 11:01 Число просмотров: 1956
Автор: SLS Статус: Незарегистрированный пользователь
|
Господа, посмотрите пожалуйста и подскажите, что я делаю не так. На EXCEL листе набиты Ф.И.О. около 900 записей, в каждой строке в таком порядке:
Борисов
Владимир
Викторович
Петров
Петр
Петрович
и т.д. Надо их переписать на другой лист так, чтобы Ф.И.О. стояли в разных столбцах:
Борисов Владимир Викторович
Петров Петр Петрович
Private Sub CommandButton2_Click()
Worksheets("Лист1").Activate
NumStr = 4
For i = 1 To 900
s = Worksheets("Лист1").Cells(NumStr, 1) ' вся строка
If s = "" Then Exit For
f = Left(s, 15)
Worksheets("Лист 2").Cells(NumStr, 1) = f
NumStr = NumStr + 1
i = Left(s, 15)
Worksheets("Лист2").Cells(NumStr, 2) = i
NumStr = NumStr + 1
Next
End Sub
|
- Как в VBA из массива записей сделать выборку на другой лист? - SLS 17.05.05 11:01 [1956]
|
|
|