根据现有表格指定导出指定行的数据到表二中

更新时间:01-27 教程 由 思君 分享

根据现有表格指定导出指定行的数据到表二中?

提示: 插入模块,编辑一个宏:

1、用GetObject函数,将 D:\MyDocuments\数据备份.xls文件读取到内存。

2、用语句Range("A1000").End(xlUp).Row读取最后一行行号n,假若超过1000行,只要改变1000即可。

3、判断A5单元格是否为零,若为零,则用Range("A"&n&":C"&n).EntireRow.ClearComments清除数据;

4、清除完毕后,用 MsgBox"数据清除成功" 语句提示结束。

5、在目前文档中一个单元格用于标识数据清除标识,例如A5单元格,若A5=0,表示未清除,若A5=1,则表示已清除。

6、在打开文件模块语句中,将A5单元格清零。 以上为提示,具体代码,你不妨自己写。

声明:关于《根据现有表格指定导出指定行的数据到表二中》以上内容仅供参考,若您的权利被侵害,请联系13825271@qq.com
本文网址:http://www.25820.com/tutorial/14_2290771.html