Как увеличить список значений с помощью кнопки

Я пытаюсь управлять списком студентов в базе данных Excel. Я пытаюсь создать кнопку, которая будет увеличивать столбец семестра на 1 при нажатии. Я пытался использовать кнопку active-x и спиннер, но не достиг своей цели. Моя проблема заключалась в изменении целого столбца (или выбранного диапазона) и увеличение выбранных ячеек на 1. Это будет манипулировать сотнями строк.

Вот пример данных:

До нажатия кнопки: 2, 4, 1, 6, 7...

После нажатия кнопки: 3, 5, 2, 7, 8...

Спасибо за помощь!

Источник

1 ответ

Решение

Вот пример числовых значений в диапазоне от A2 до A78. Поместите этот код в стандартный модуль:

Sub Incrementer()
    Dim rr As Range
    Set rr = Range("A2:A78")
    For Each r In rr
        r.Value = r.Value + 1
    Next r
End Sub

Поместите кнопку (или другую фигуру) на лист, содержащий данные, и назначьте макрос кнопке.

Источник
Другие вопросы по тегам