Автоматическая нумерация столбцов

= Мир MS Excel/Автоматическая нумерация столбцов - Мир MS Excel

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Дата: Суббота, 09.08.2014, 00:17 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 100% ±

Excel 2007

Здравствуйте, приложенный макрос в столбце А автоматически указывает номер строки.

[vba]

Код

Sub Нумерация()
For i = 1 To 10
f = i + 6
Range("A" & i).Value = i
Next
End Sub

[/vba]
Необходим аналогичный макрос для нумерации столбцов. Заранее спасибо

Сообщение отредактировал Serge_007 - Суббота, 09.08.2014, 22:48

Дата: Суббота, 09.08.2014, 00:55 | Сообщение № 2

Группа: Авторы

Ранг: Старожил

Сообщений: 1613

Репутация: 563 ±

Замечаний: 0% ±

Excel 2013, 2016

вместо Range("A" & i).Value = i попробуйте Cells(1, i).Value = i

Яндекс.Деньги 4100159601573