试了很多代码都不行...以下是还能想起来的一些试过的(B8:S200是需要清空的区域)
Worksheets("sheet1").Range("B8:S200").Clear
Worksheets("sheet1").Range("B8:S200").ClearContents
Dim rng As Range
Set rng = Range("B8:S200")
rng.Clear
Range("B8:S200").Clear
试试录制宏?
set rnf=想要的区域
rnf.ClearContents '清除区域内格式+内容
方法你都拿到了,按理能写出来
range("b8:S200").clearcontents