[算表] vba如何取看的見資料的最後一列?

看板Office作者 (美少婦與女兒同學的故事)時間8年前 (2017/06/13 13:54), 8年前編輯推噓0(0010)
留言10則, 2人參與, 最新討論串1/1
軟體:excel 版本:2007 如果A1:A10 其中A1:A5有資料 理論上用range("A1").end(xldown).row 會得到5 但是總是得到10 發現似乎空格不是真的完全空白 這種狀況vba要怎麼寫? 檔案 https://drive.google.com/open?id=0BwCgrQhGgaw7X0xIS2kzWkNIVDA -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 60.250.67.77 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1497333266.A.A4C.html ※ 編輯: ljuber (60.250.67.77), 06/13/2017 13:54:49 ※ 編輯: ljuber (60.250.67.77), 06/13/2017 14:06:34

06/13 14:24, , 1F
可改以range.find 搜尋"*",after為儲存格a1
06/13 14:24, 1F

06/13 14:25, , 2F
searchdirection為previous
06/13 14:25, 2F
MsgBox Range("A1:A100").Find(What:="*", After:=Range("A1"), _ LookAt:=xlWhole, SearchDirection:=Previous, _ SearchOrder:=xlByRows, MatchCase:=True, _ SearchFormat:=True).Row 這樣會傳回2 不知道要怎麼改@@ ※ 編輯: ljuber (60.250.67.77), 06/13/2017 14:44:13

06/13 14:48, , 3F
xlPrevious
06/13 14:48, 3F

06/13 15:20, , 4F
解決了!!感謝S大
06/13 15:20, 4F

06/14 16:14, , 5F
想問下S大 若是針對有資料的range select的話 要怎麼改
06/14 16:14, 5F

06/14 16:38, , 6F
以檔案來看原po是select的情況為?
06/14 16:38, 6F

06/14 16:47, , 7F
應該說是copy才對...
06/14 16:47, 7F

06/14 17:14, , 8F
如以欄來複製的話,可用range連接儲存格字串位置,或以
06/14 17:14, 8F

06/14 17:16, , 9F
range.resize來調整範圍,要偏移以range.offset
06/14 17:16, 9F

06/15 21:01, , 10F
感謝s大我成功了
06/15 21:01, 10F
文章代碼(AID): #1PFtuIfC (Office)
文章代碼(AID): #1PFtuIfC (Office)