[問題] VBA函數運算問題

看板Office作者 (秋ㄟ)時間4年前 (2019/11/05 19:33), 編輯推噓1(1推 0噓 29→)
留言30則, 4人參與, 4年前最新討論串1/1
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:Excel 版本:2010 用巨集寫基本運算函數，但是因為每次擷取的資料庫筆數不同，而用錄製方式擷取到的程 式寫法筆數會變成固定的... 有辦法知道最後一筆的筆數，並將全部筆數執行函數運算嘛 懇請各位大大解答QQ https://i.imgur.com/vTCv6Zx.jpg
-- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.47.178.197 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1572953611.A.F30.html
→
11/05 19:39, 4年前 , 1F
是指最後一筆有資料的列號嗎？如果是的話
11/05 19:39, 1F
→
11/05 19:40, 4年前 , 2F
range.end(..).row或range.find.row，如果資料連續的話
11/05 19:40, 2F
→
11/05 19:40, 4年前 , 3F
工作表函數count或counta
11/05 19:40, 3F
→
11/05 20:36, 4年前 , 4F
就是我想要一列進行資料運算，但是每次的資料筆數不一定
11/05 20:36, 4F
→
11/05 20:36, 4年前 , 5F
~
11/05 20:36, 5F
→
11/05 20:36, 4年前 , 6F
如文內A2:A9999, 但是A9999應該是不定值(最後一筆資料)
11/05 20:36, 6F
→
11/05 20:36, 4年前 , 7F
，卡關，不知道巨集該怎麼撰寫QQ
11/05 20:36, 7F
→
11/05 20:46, 4年前 , 8F
就以回文方式來取得最後一筆有值的列號
11/05 20:46, 8F
→
11/05 20:48, 4年前 , 9F
看是否寫入變數，變數的話就同上列所寫的 "..:a" & 變數
11/05 20:48, 9F
→
11/05 21:04, 4年前 , 10F
感謝S大~我再試試看~抱歉EXCEL尚很少用，很薄弱。
11/05 21:04, 10F
推
11/05 21:40, 4年前 , 11F
i=range("a1").end(xldown).row
11/05 21:40, 11F
→
11/05 21:41, 4年前 , 12F
range("a2:a" & r)
11/05 21:41, 12F
→
11/05 21:56, 4年前 , 13F
不正確，要寫入變數i，那怎麼"a2:a" & r 卻用r
11/05 21:56, 13F
→
11/05 21:58, 4年前 , 14F
所舉的例也要連結上也要用變數i
11/05 21:58, 14F
→
11/05 21:58, 4年前 , 15F
且不確定資料是否連續，也不要回文上就是用xldown的方式
11/05 21:58, 15F
→
11/05 21:59, 4年前 , 16F
要這樣回也請假設資料是連續的情況下
11/05 21:59, 16F
→
11/05 22:01, 4年前 , 17F
連續且連續資料是二個儲存格以上再使用xldown
11/05 22:01, 17F
→
11/05 22:01, 4年前 , 18F
不然請用xlup方式
11/05 22:01, 18F
→
11/06 15:02, 4年前 , 19F
LR=Sheets("工作表1").Cell(1,"A").End(xlUp).Row
11/06 15:02, 19F
→
11/06 15:02, 4年前 , 20F
Range(Cells(2,"A"),Cells(LR,"A"))
11/06 15:02, 20F
→
11/06 15:33, 4年前 , 21F
不正確，1.不是cell而是cells
11/06 15:33, 21F
→
11/06 15:34, 4年前 , 22F
2.就算是cells(1,"A").end(xlup).row也不正確，因為a1往上
11/06 15:34, 22F
→
11/06 15:35, 4年前 , 23F
不論a1本身有無資料都只會回傳1而已
11/06 15:35, 23F
→
11/06 15:35, 4年前 , 24F
要取a欄不論是否連續資料的最後一筆有資料的列號
11/06 15:35, 24F
→
11/06 15:38, 4年前 , 25F
以range("a1048576")或cells(1048676,1[或"A"]).end(xlup)
11/06 15:38, 25F
→
11/06 15:38, 4年前 , 26F
.row
11/06 15:38, 26F
→
11/06 15:38, 4年前 , 27F
但有一限制就是a1048576這儲存格為空白儲存格
11/06 15:38, 27F
→
11/06 15:39, 4年前 , 28F
cells(1048576,...)
11/06 15:39, 28F
→
11/06 15:42, 4年前 , 29F
這限制要排除的話，以range.find的方式
11/06 15:42, 29F
→
11/06 20:11, 4年前 , 30F
感謝S大，我的問題解決了~
11/06 20:11, 30F
‣ 更多 su198932 的文章
文章代碼(AID): #1TmLuBym (Office)