excel快速選擇單元格 快速實現單元格選擇的方法

excel快速選擇單元格 快速實現單元格選擇的方法，周報、月報、半年報，每當你做這些報告的時候是不是非常的頭痛，但是話又說回來了，如果你多掌握一些辦公軟件相關的知識，或許會讓你負擔減少很多，excel快速選擇單元格你是不是也經常遇到過，像excel快速選擇單元格 快速實現單元格選擇的方法這類問題，看完今天這篇文章你一定會有收獲！

在編寫VBA程序對數據進行操作時，經常需要引用單元格。在Excel中，為函數指定參數所在的單元格時，可以使用“參數”按鈕來進行單元格的選擇。實際上，使用"RefEdit"控件，在編寫VBA程序時，也能實現相同的功能。本文介紹了快速實現單元格選擇的方法。

1、啟動Excel并打開工作表，打開Visual Basic編輯器，在工程資源管理器中鼠標右擊，選擇關聯菜單中的“插入”|“用戶窗體”命令插入一個用戶窗體。在用戶窗體中添加一個“標簽”控件和兩個“命令按鈕”控件，將兩個按鈕控件的"Caption"屬性分別設置為“確定”和“取消”，將窗體控件的"Caption"屬性設置為“設置邊框樣式”，將“標簽”控件的"Caption"屬性設置為“指定需要設置的單元格”，如圖1所示。

圖1　設置控件的

2、在“工具箱”對話框中鼠標右擊，選擇關聯菜單中的“附加控件”命令打開“附加控件”對話框，在“可用控件”列表中勾選"RefEdit Ctrl"復選框，如圖2所示。單擊“確定”按鈕將其添加到“工具箱”對話框中，在“工具箱”對話框中選擇該控件，在窗體中繪制控件，如圖3所示。

圖2　勾選

圖3　向窗體中添加控件

3、雙擊“確定”按鈕，為該按鈕添加Click事件代碼，具體的程序代碼如下所示：

Private Sub CommandButton1_Click()

Dim rng As Range '聲明一個對象變量

Set rng=Range(RefEdit1.Value) '將選擇單元格對象賦予變量

With rng.Borders

.LineStyle=xlContinuous '設置邊框線樣式

.Weight=xlThin '設置線寬

.ColorIndex=5 '設置邊框線顏色

End With

rng.BorderAround xlContinuous,xlMedium,5 '向單元格區域添加邊框

Set rng=Nothing '清除對象

End Sub

4、雙擊“取消”按鈕，為該按鈕添加Click事件代碼，具體程序代碼如下所示：

Private Sub CommandButton2_Click()

Unload Me

End Sub

5、按F5鍵運行程序，單擊"RefEdit"控件上的按鈕

恢復用戶窗體，選擇單元格區域地址在控件中顯示。單擊“確定”按鈕，選定單元格被添加了邊框線，如圖4所示。單擊“取消”按鈕將關閉對話框。

圖4　單擊“確定”按鈕為選擇單元格添加邊框線