VBA如何准确获取到含有输入内容的单元格区域？

shenlong2006

利用UsedRange属性获取使用的单元格区域时，只修改行高、列宽等属性而未输入任何内容的单元格也被统计进去了（如下图），有什么更准确的获取方法么？



usedrange.rar (6.67 KB, 下载次数: 3)

2014-2-27 14:10 上传

点击文件名下载附件

冠军欧洲2010

笨法。

1. Sub test()
   
2.     Dim RG As Range
   
3.     Sheets(1).Activate
   
4.     Set RG = Sheets(1).UsedRange
   
5.     RG.SpecialCells(xlCellTypeConstants).Select
   
6. End Sub
   

复制代码

风林火山

set rg=range("a1").currentregion