有时候,一条小小的代码能够起到很好的效果。例如,我们希望仅能编辑工作表中的指定区域,其他区域不可编辑,只有一些控件能够操作,一些VBA代码能够在后台运行,如下图1所示。
图1
在图1所示的工作表中,我们只能编辑单元格区域B2:C3,只能查看工作表的可见部分,当然,还能够单击按钮控件,运行VBA代码。
想要实现这样的效果,在ThisWorkbook代码模块中,输入下面的代码:
Private Sub Workbook_Open()
Worksheets("Sheet1").ScrollArea ="$B$2:$C$3"
End Sub
这样,每次打开该工作簿,将限定工作表Sheet1中的可编辑区域为B2:C3。你可以根据你的需要,在代码中修改该区域。