Динамическое создание формул

Question

На листе 1 у меня есть один застойный столбец, предположим, что столбец «А» копируется снова и снова в следующий пустой столбец на том же листе

Как и 1-й, он копируется в столбец «В», затем найдите следующий пустой столбец &скопировать данные в столбец «C»

-> Здесь у меня вопрос

Я хочу создать формулу на листе 2 в столбце «A», где она создаст формулу со следующим заполненным столбцом на листе Sheet1

Как и

1. 1-й делает вычисление: Sheet1!A1/Sheet1!B1

   Через несколько минут

2. делает формулув той же колонке «А» листа 2: Sheet1!A1/Sheet1!C1

   Через несколько минут

и т. д.

Sub GoToNextCol()
    Application.ScreenUpdating = False

    Dim NextCol As Long
    NextCol = Sheet1.Cells(1, Columns.Count).End(xlToLeft).Column + 1

    Sheet1.Range("A1").CurrentRegion.Copy Sheet1.Cells(1, NextCol)

    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

Answer 1

Вы имеете в виду это?

В ячейке Sheet2 A1

sheet2.range("a1").formula="=Sheet1!A1/Sheet1!" & cells(1,nextcol).address(0,0)