[算表] 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 這個才對