Как запустить каждую l oop для ссылки на ячейку с помощью кнопки в VBA Excel

Question

У меня есть приведенный ниже код для цикла строки за строкой для обновления ссылок ячеек с одного листа на другой.

Public Sub Update()    
Dim i As Integer

     For i = 2 To Sheet1.Range("A" & Rows.Count).End(xlUp).Row
     Sheet2.[B4] = Sheet1.Range("B" & i)
     Sheet2.[B5] = Sheet1.Range("C" & i)
     Sheet2.[B6] = Sheet1.Range("D" & i)

     Next i
    End Sub

Как создать кнопку, чтобы при каждом нажатии ячейка обновить на одну строку?

Answer 1

Ниже приведены шаги для добавления кнопки, а затем вы можете добавить свой код.

1. Go на вкладке разработчика в Excel (версия 2010), нажмите «Элементы управления формой» и затем добавьте кнопка.
2. После добавления правой кнопкой мыши нажмите кнопку и затем щелкните Назначить макрос.
3. Вы можете назначить существующий макрос или создать новый.

, если вы используя другую версию, элементы управления формой могут быть на вкладке «Вставка».