应用APPLICATION时候
dim wk as workbook
set wk = application.workbooks.open()
可以在后台打开EXCEL文件,并在前台显示
dim wk as workbook
dim app as new application
set wk = app .workbooks.open()
可以在后台打开EXCEL文件,并且不在前台显示,这样操作有个弊病,就是当读入的文件数据量很大的时候,操作的时间会比前台显示这个文件的操作时间多几百倍
application并不支持断点调试的,所以不可以在相关行设断点
offset的应用(可以通过给定的这个单元格,到达当前sheet的任一个位置)
range("A1").offset(row,col) ------------------从某一个单元格开始通过参数前后左右的移动
range("A1").offset(row,col).row -------------移动后到达的单元格所在的行数
range("A1").offset(row,col).address ---------移动后到达的单元格的绝对地址
range("A1").offset(row,col).col---------------移动后到达的单元格所在的列数
判断给定的单元格是否存在,我一般用 not isobject来判断,如果单元格存在,则不走下一步,若不存在,则走下一步
如:
if (not isobject(range("AA")) THEN
msgbox "该单元格不存在"
else
msgbox "该单元格存在"
END IF
还要注意的是:
如果一个单元格里面内容为空,这个时候应用Isnumeric,返回false,这个时候我一般配合IIF函数进行组合应用,保证单元格为空时,应用Isnumeric,返回true