Архив форумов ЦИТФорума

[PoMaH]

есть столбец в нем значения.
примерно 1000
Нужно из этого столбца выбрать каждую 6 яцейку данных.
10, 30 ?
как это организовать?
- формулой
- макросом
- или еще как ни будь?
плиз жду.

[Adil]

Что значит "выбрать"?

[PoMaH]

выбрать, значит взять данные из ячейки.
и вставить в другую.
Примерно такая ситуация:
А1=стол
А2=стул
А3=молоко
мне нужно сделать так чтобы в Б2 отсортировалось путем прогрессии или как там
не знаю с интервалом в один шаг:
получилось:
Б1=стол
Б2=молоко

путём перетаскивания пробовал через прогрессию с шагами не канает..
больше мазгов не хватает
там всякие макросы писать или формулы...
подмогите плиз.

[Lex_!]

Так ты хелп почитай.... там про макросы все написано..... и достаточно доступно....

[Adil]

Sub Макрос1()
Dim delat As Integer
delta = Cells(1, 3).Value
If delta > Then
i = 1
j = 1
While Cells(j, 1).Value ""
Cells(i, 2).Value = Cells(j, 1).Value
i = i + 1
j = j + delta
Wend
End If
End Sub

[Adil]

Sub Макрос1()
Dim delat As Integer
delta = Cells(1, 3).Value
If delta БОЛЬШЕ Then
i = 1
j = 1
While Cells(j, 1).Value НЕРАВНО ""
Cells(i, 2).Value = Cells(j, 1).Value
i = i + 1
j = j + delta
Wend
End If
End Sub