Используя функцию цикла VBA, я хочу ввести одну и ту же формулу в одну и ту же ячейку на каждом листе в моей книге.
Я пробовал следующий код, но он не перебирает все листы. Он обновляет только тот, который выбран по умолчанию:
Sub insertformula()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
Range("D7").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[-5]C[-1],'SHEET ALL WILL REFERENCE'!C[-2]:C[-1],2,FALSE)"
Next
End Sub
Чего мне не хватает, чтобы этот код не проходил по всем листам?
Спасибо,