如何在Excel VBA中为列号指定特定数值

Question

我目前有这样的代码：

Sub MyMacro()
    If Range("A11") = "5" Then
        Range("C3:C6").Select
        Selection.AutoFill Destination:=Range("C3:M6"), Type:=xlFillDefault
   End If
End Sub

我希望能够在A11中输入一个值，这将改变M值。在这种情况下，在A11中输入5，对应于Destination：= Range中的值M.如何使用一小段代码创建一种动态范围，以表示：

在A11中，5 = M，6 = N，7 = O，8 = P等

Answer 1

Sub Macro2()
    Range("C3:C6").AutoFill Destination:=Range("C3", Cells(6, 8 + [A11])), Type:=xlFillDefault
End Sub