为什么我得到Object Required错误（VBA，Excel）

Question

为什么以下代码有误？

Sub SetFont()
    Dim a1 As Range
    Set a1 = Range("a1")
    SetFontSize (a1)
End Sub

Sub SetFontSize(target As Range)
    target.Font.Size = 11
End Sub

调用SetFontSize方法时出现“运行时错误424：对象需要”错误。

Answer 1

您没有调用函数，调用SetFontSize (a1)时不需要括号。

只需使用：

SetFontSize a1