Запустить макрос для кандидатов в списке

Question

У меня есть макрос с именем MACRO1 для расчетов и вставки результатов в другой лист.

Каждый раз, когда мне нужно ввести имя кандидата (PETER, JOHN, MARY, KAT IE, et c) в ячейку B1 моего рабочего листа с именем MAINSHEET, чтобы обновить значения в диапазоне до того, как я запустил MACRO1.

Список кандидатов был помещен в A1: A500 из MAINSHEET (т.е. я должен запустить MACRO1 500 сотен раз).

Я ищу код для автоматизации шага «ввода значения от A1 до B1, запуска MACRO1, ввода значения от A2 до B1, запуска MACRO1, ввода значения от A3 до B1 , запустите MACRO1 ... "

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

Answer 1

Или, если вы не хотите изменять свой макрос, попросите другого запустить его в al oop для вас:

Sub loops()
Dim i As Long, ws As Worksheet
Set ws = Worksheets("MAINSHEET")
For i = 1 To 500
    ws.Range("B1") = ws.Range("A" & i)
    Call MACRO1
Next i
End Sub