使用RefEdit控件选择区域.docxVIP

技巧 1 使用 RefEdit 控件选择区域 在技巧 错误！未找到引用源。 中介绍了如何使用 InputBox 方法获得所选单元格区域的 地址，而使用 RefEdit 控件获得单元格区域的地址比使用 InputBox 方法更加方便，可以单 击 RefEdit 控件中的按钮以折叠用户窗体，选定区域后再单击按钮展开用户窗体， 示例代码 如下： #001 Private Sub CommandButton1_Click() #002 Dim Rng As Range #003 On Error GoTo line #004 Set Rng = Range(RefEdit1.Value) #005 Rng.Interior.ColorIndex = 15 #006 Unload UserForm1 #007 Exit Sub #008 line: #009 MsgBox  你选择的是非单元格区域  ! #010 End Sub 代码解析： 用户窗体中按钮的单击事件过程，  改变用户使用  RefEdit  控件所选择的单元格区域内部 的颜色。 第 3 行代码，错误处理语句。因为如果用户输入或选定了错误的单元格区域地址，将显示一错误信息，如图 1-1 所示，所以必需使用 On Error GoTo 语句来绕过错误。 图 1-1 提示运行错误 第 4 行代码，使用 Set