vba - 除算式

Question

セル内の式で除算を行うことは可能ですか?

数式をセルに入れる必要があります。

私は試しましたが、動作しません。

Range("A1").Formula = "="& Range(Cells(4,5),Cells(4,9)).Address(False, False) & ")"

Answer 1

このようなもの？

Sub Main()

    Dim lastCol As Long
    lastCol = 5

    Range("A1").Formula = "=" & Cells(4, lastCol).Address & "/" & Cells(10, lastCol).Address

End Sub