Q：如下圖1所示，在工作表中，有3個(gè)數(shù)值調(diào)節(jié)按鈕（窗體控件），每個(gè)按鈕鏈接到一個(gè)單元格。當(dāng)點(diǎn)擊數(shù)值調(diào)節(jié)按鈕的上下箭頭時(shí)，鏈接到的單元格中的數(shù)值會(huì)相應(yīng)的增加或減少。
圖5
在VBE編輯器的Sheet2代碼模塊中，輸入代碼：
Private SubWorksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target,Range(“ControlRange”)) Is Nothing Then
Range(“SelectedRow”).Value =0
Exit Sub
End If
Range(“SelectedRow”).Value = Target.Row
Application.CalculateFull
End Sub
至此，所有的工作完成。選擇單元格C3，單擊數(shù)值調(diào)節(jié)按鈕，C3中的數(shù)值會(huì)相應(yīng)變化，對(duì)于單元格C4和C5也是如此，如圖6所示。
圖6
如果要鏈接到不連續(xù)的單元格區(qū)域，例如單元格區(qū)域C3:C5、B6:B8、C9：C11中的9個(gè)單元格，那么可以將名稱ControlRange修改為：
=Sheet2!$C$3:$C$5,Sheet2!$B$6:$B$8,Sheet2!$C$9:$C$11
