[問題] vba 最後一列

[BerylKuo (Beryl Kuo)]

(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:excel

版本:2016

想請教板上神人，
如果要將一個範圍的資料轉換表格（圖一），
但資料最後一列可能是會改變的，
ex:有可能是E10或E200，
要怎麼判斷最後一列並將資料轉換為表格呢？
附上vba目前寫法如圖二（紅字處是變數）
再勞煩各位大神提點了，感激不盡！

圖一
https://i.imgur.com/7uckqmT.jpeg

圖二
https://i.imgur.com/d9QFfhI.jpeg




--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.77.217.254 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1721141522.A.93C.html
推 sam1234580: 最簡單的辦法 加個輔助格=COUNTA(A:A) VBA抓他當變數
https://i.imgur.com/aFW5ATA.jpeg

謝謝您的回覆，
那如果將輔助格做在Y10，
紅框處該怎麼修正呢？謝謝您！

※ 編輯: BerylKuo (42.77.217.254 臺灣), 07/17/2024 09:12:23
※ 編輯: BerylKuo (42.77.217.254 臺灣), 07/17/2024 09:13:11
推 tinkens: Maxrow=Range("E1048576").End(xlUp).Row
→ tinkens: 表示Maxrow=從E1048576往上找到第一個數值的位置
→ tinkens: 然後Range("A1:E10")改成
→ tinkens: Range(Range("A1"),Range("E" & Maxrow))
已解決，真的太感謝了！
※ 編輯: BerylKuo (42.77.217.254 臺灣), 07/17/2024 12:46:43