1、效果如下
2、代码如下
Option Explicit
Sub ClearRanges()
Worksheets("Sheet1").Range("A1:A9,c2:e16,G7:k7"). _
ClearContents
End Sub
可以选择多个区域,并进行处理,这里是删除了选中单元格内容。
这是学习了excelfans的例子。
1、效果如下
2、代码如下
Option Explicit
Sub ClearRanges()
Worksheets("Sheet1").Range("A1:A9,c2:e16,G7:k7"). _
ClearContents
End Sub
可以选择多个区域,并进行处理,这里是删除了选中单元格内容。
这是学习了excelfans的例子。