Excel2k7/VBA：當單擊表單按鈕時獲取單元格地址

Question

我在多個單元格中有多個表單按鈕，當點擊其中任何一個時，我必須執行一個函數。現在我需要知道哪個單元格有這個單擊的按鈕，以便我可以採取下一步。

在此先感謝

Answer 1

當您處於設計模式（意味着您可以移動和調整按鈕）時，您可以雙擊一個按鈕，VBA編輯器將打開該按鈕的Click事件的子例程。如上所述，它們與您碰巧以任何方式擁有它們的單元格都沒有關聯。

Answer 2

表單控件不直接鏈接到工作表單元格。他們可以'錨定'他們的大小爲&對齊的目的，但據我所知沒有任何關係與細胞，可以讓你得到一個單元格的參考，假設甚至可以毫不含糊地確定。

雖然每個窗體控件只能運行一個宏，但肯定很容易識別這種方式，不是嗎？

Answer 3

Dim r As Range 
    Set r = ActiveSheet.Buttons(Application.Caller).TopLeftCell 

上面的代碼會給你按鈕的單元格地址（這隻適用於表單按鈕不活動x按鈕）。

Answer 4

由於某些原因，我不得不使用.Shapes（Application.Caller），因爲.Buttons（Application.Caller）正在返回一個錯誤。