Макрос заполнение строки - MS Excel

@faraon1494 · Регистрация: 22.01.2015

я вообще не разбираюсь excel. Как написать такой макрос пример мне нужен заполнить до 100 каждый 5 строк новый цифр

@Казанский · 09.11.2016, 10:41

faraon1494,

Visual Basic

Sub vv()
Dim i&
  For i = 1 To 100
    Cells((i - 1) * 5 + 1, 1).Resize(5) = i
  Next
End Sub

@faraon1494 · 09.11.2016, 14:53 **[ТС]**

Спасибо большое!! А то я сидел бы целых недель заполняя до 2 000 000

@faraon1494 0 / 0 / 0 Регистрация: 22.01.2015 Сообщений: 11
		1
	Макрос заполнение строки - MS Excel 09.11.2016, 09:42. Показов 3063. Ответов 2 Метки нет (Все метки) я вообще не разбираюсь excel. Как написать такой макрос пример мне нужен заполнить до 100 каждый 5 строк новый цифр 0

@faraon1494 0 / 0 / 0 Регистрация: 22.01.2015 Сообщений: 11
	09.11.2016, 14:53 [ТС]	3
	Спасибо большое!! А то я сидел бы целых недель заполняя до 2 000 000 0

Решение