從ActiveCell開始循環

Question

有沒有一種方法可以從調用函數的位置開始填充一組值？

Function score2(TYP) 
If TYP = "1" Then 
    Dim i As Integer 

For i = 1 To 10 Step 1 

    ActiveCell.Condition = 1 

    Next 
End If 
End Function 

Answer 1

有一種方法可以知道函數調用哪個單元格。 Application.Caller給你的細胞。

但是沒有辦法從工作表中調用的函數中更改工作表。爲此使用單獨的宏，並在響應事件時觸發它，而不是在表單計算期間觸發它。