Привет! Я полный новичок в ексель Вопрос довольно банален. Нужно к числу в ячейке прибавить цифру и размозжить ячейки по столбцу. Необходимо именно размножить с прибавлением. Пример: 100 + 10 = 110 + 10 = 120 и т.д. Столбец: 100 110 120 130 140
К сожалению на яндексе и ютубе не нашлось подобного вопроса и урока.
Также заполнении данных изучите . 100 в ячейку, за правый нижний угол правой кнопкой протянуть, выбрать последний пункт Series и в открывшейся форме указать шаг 10.
P.S. Как к слову Series в русском перевели? Лень переключать интерфейс. Последовательности или как?
БМВ, спасибо! Как всё-таки интересно коды рекордера (методы) принципиально отличаются при "левом" и "правом протягивании"… Надо экспериментировать)) справка
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
fen1k, вот пример простенького макроса на основе макрорекордера. Работает с выделенной областью одного столбца. Первая ячейка выделения должна быть числом (дата - тоже число для Excel). Поддерживает несмежные диапазоны (выделенные с зажатым Ctrl, например). При любой ошибке выдаёт месэдж и завершает работу.
Можно допиливать, выводя шаг и стоп в InputBox'ы, добавить поддержку нескольких столбцов с одним и тем же или разным шагом и стопом и так далее
Код
Option Explicit
Sub Протянуть()
On Error GoTo er
If Selection(1).Value2 <> (-1) * Selection(1).Value2 * (-1) Then GoTo er
Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, Step:=10, Trend:=False
GoTo fin
er:
MsgBox "КРИТИЧЕСКАЯ ОШИБКА!", vbCritical, "FATAL ERROR"
fin:
On Error GoTo 0
End Sub
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄