Пошаговое выполнение макроса

@Merser5 · Регистрация: 10.12.2013

Author24 — интернет-сервис помощи студентам

Привет,
написал макрос который добавляет в активную ячейку цифру и переходит ниже на ячейку и тоже добавляет цифру,
нужно чтоб при нажатии кнопки он добавлял цифру в активную ячейку, при следующем нажатии переходил на ячейку ниже и к предыдущей цифре добавлял + 3 и так при каждом нажатии, как реализовать такой макрос
Спасибо

Visual Basic

Public Sub ActiveRow()
MsgBox ActiveCell.Address
ActiveCell.Value = 3
ActiveCell(2).Activate
ActiveCell.Value = 3
End Sub
Sub Macro()
ActiveRow
End Sub

@Казанский · 09.01.2018, 18:23

Merser5, не совсем понятно. Приложите файл с тремя столбцами, которые содержат состояние столбца А при последовательном нажатии кнопки три раза.

@Merser5 · 09.01.2018, 18:32 **[ТС]**

мне не много не правильно передали задание, выделяем мышкой ячейку, если в ней число, увеличеваем число в три раза, если ячейка ниже тоже не пустая то тоже увеличим число в 3 раза, переписал код вот мой:

Visual Basic

Public Sub ActiveRow()
Dim val As Variant
MsgBox ActiveCell.Address
val = ActiveCell.Value
If val > 0 Then
ActiveCell.Value = val * 3
val = ActiveCell(2).Value
End If
End Sub
Sub Macro()
ActiveRow
End Sub

@Казанский 15151 / 6424 / 1731 Регистрация: 24.09.2011 Сообщений: 9,999
	09.01.2018, 18:23	2
	Merser5, не совсем понятно. Приложите файл с тремя столбцами, которые содержат состояние столбца А при последовательном нажатии кнопки три раза. 0

	09.01.2018, 18:32