[算表] excel宏范围判断？ ljuber PTT批踢踢实业坊

[算表] excel宏范围判断？

楼主: ljuber (美少妇与女儿同学的故事) 2016-01-06 14:28:14

软件:excel
版本:2007
我有录制了两个宏
1.
Sheets("a").Select
Range("4:500").Clear
Sheets("b").Select
Range("4:500").Clear
Sheets("c").Select
Range("4:500").Clear
Sheets("d").Select
Range("4:500").Clear
目的是把a,b,c,d工作表4列以下的资料都clear掉
目前我只会设定到500...
不知道有没有更简化的写法?
2.进阶筛选：
贴上.AdvancedFilter xlFilterCopy, Worksheets("xyz").Range("A28:A36"),
Worksheets("abc").Range("A4")
其准则范围在xyz工作表的A28到A36
但是资料会一直增加，不知道怎么设定A28到A36是会随资料增加而变化？
感谢大大....

作者: soyoso (我是耀宗) 2016-01-06 14:44:00

问题2，如要取最后一笔有资料列号或储存格，可用range.end

楼主: ljuber (美少妇与女儿同学的故事) 2016-01-06 14:52:00

Range("A28").End(xlDown) 是类似这样吗？不过我好像这样会变成把全部资料都筛过来好怪@@

作者: soyoso (我是耀宗) 2016-01-06 14:55:00

类似range("a28",range("a28").end(xldown))要xldown要留意是否是连续资料，反之用xlup会比较无这问题但用xlup时则由工作表最后一列来向上寻找

楼主: ljuber (美少妇与女儿同学的故事) 2016-01-06 15:06:00

不过我直接替换那行会传回错误...Worksheets("xyz").range("a28",range("a28"),end(xldown)

作者: soyoso (我是耀宗) 2016-01-06 15:09:00

问题1 sheets(array("a","b","c","d")).selectrows("4:500").select:selection.clearrange("a28"),end(xldown) 中间不是,逗号

楼主: ljuber (美少妇与女儿同学的故事) 2016-01-06 15:42:00

https://drive.google.com/open?id=0BwCgrQhGgaw7N3l3ZjBJ还是不行我附上档案http://0rz.tw/tuKWg 这个才对