myAddr?=?ActiveWorkbook.Application.ThisCell.Address
End?Function
將返回運行自定義函數的單元格的地址
所以可以用
Dim?rC?As?RangeSet?rC?=?ActiveWorkbook.Application.ThisCell
這樣rC的行/列號就可以使用了,註意這樣的自定義函數是可以隨意拖動的。
樓主當然明白,由於是屬於VBA的自定義函數,需要觸發才能更新,按F9或,在Excel設定為自動重算的前提下有單元格的數據發生變化而觸發重算時或,在Excel設定為保存時重算並且操作者執行了保存是,才會更新自定義函數的數據。