m0_62532686的博客

有些部门发来的表格完全是按照以前的模板写的，这种情况使用UsedRange属性时会把第15行和第16行一起算进去 有些部门漏写，这种时使用Range("A65536").end(3).row判断行数时，会把第14行遗漏 还有的部门更加离谱，汇总后的表格还要手动整理 所以为了准确获取表格所在位置，只根据有无内容判断表格的行号，我写了这样一段程序 Sub 判断当前表格的数据区域() Dim datarange As Range, rangerow, rangecol, maxrow...

word VBA运行时错误'4198'：应用程序定义或对象定义错误 解决方法