如果不懂如何產生按鈕及關聯程式再追問，這裡不解答這部分了。
因為你表達的有歧義，故下面給三種方法。
'一、為指定單元格寫入公式（稍微修改指定單元格也可以是變數）：
Sub 為儲存格寫入公式（）
Range(＂B2＂).Select
ActiveCell.Formula = ＂=VLOOKUP(A2，表2!A:B,2,0)＂
#'ActiveCell.Formula = ＂=VLOOKUP(A:A，表2!A:B,2,0)＂
#'ActiveCell.FormulaR1C1 = ＂=VLOOKUP(RC[-1]，表2!C[-1]:C[0],2,0)＂
'ActiveCell.FormulaR1C1 = ＂=VLOOKUP(C[-1]，表2!C[-1]:C[0],2,0)＂
End Sub
'二、解釋VLOOKUP函數，在指定單元格引用查找值：
Sub 指定單元格尋找引用（）
Dim m
With Sheets（＂表2＂）
For m = 1 To .[A65536].End(3).Row
If .Cells(m, 1) = Sheets(1).Cells(2, 1) Then
Sheets(1).Cells(2, 2) = .Cells(m, 2)
End If
Next
End With
End Sub
'二、解釋VLOOKUP函數，在指定欄位引用查找值。此處為上程式碼稍微優化，有通用性：
Sub 全部找引用（）
Dim i, j
With Sheets（＂表2＂）
For i = 1 To .[A65536].End(3).Row
For j = 1 To Sheets(1).[A65536].End(3).Row
If .Cells(i, 1) = Sheets(1).Cells(j, 1) Then
Sheets(1).Cells(j, 2) = .Cells(i, 2)
End If
Next
Next
End With
End Sub
方法/步驟
開啟 Microsoft Office Excel 2007，點選 「開始」 ->「Excel 選項」。
在彈出的對話方塊中，選擇“常規”選項卡，並在右側點選“在功能區顯示‘開發工具’選項卡”，並按“確定＂。
在儲存格A1中輸入“弧度”，儲存格B1中輸入“角度”，儲存格A2中輸入“3.14”，然後在儲存格B2中輸入公式＂=DEGREES(A2)＂在按下回車後，該單元格輸出結果為179.9087477。
註：DEGREES函數的作用是將弧度轉換為角度。
接下來，我們用VBA實現同樣的功能。點選“開發工具”標籤，點選“Visual Basic”，啟動Visual Basic編輯器。
在“Microsoft Excel 物件”上點滑鼠右鍵，依序點擊“插入” ->“模組”，建立“模組1”，並在該模組中輸入內容：
Sub 轉換（）
MsgBox Application.WorksheetFunction.Degrees(3.14)
End Sub
點擊“運行子程序/使用者窗體”按鈕，在彈出的對話框中選擇“轉換”，然後點擊“運行”按鈕。
程式彈出對話框，結果與在Excel中利用公式輸出的結果一樣，只是有效數字的位數不一樣，這可以根據需要加以取捨。
總結：在進行VBA程式設計時，可以透過WorkSheetFunction方法來實現對Excel函數的引用，藉此，可以方便我們對函數的引用，避免花費更多的時間在自訂函數上，有效的提高了工作效率。
以上是在表2中使用VLOOKUP函數在A列中尋找B20的詳細內容。更多資訊請關注PHP中文網其他相關文章！
