(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:Excel
版本:365
我想要VBA做篩選後,如果查無資料要做提醒
目前我工作表的資料最後一筆到第520列
我的寫法如下
If Range("A1").End(xlDown).Row = Range("A" & Rows.Count).Row Then
MsgBox "此日期範圍，查無訂單"
End if
照理說查無資料時: Range("A1").End(xlDown).Row 這個位置會是 A1048576
為什麼我的檔案是到A520，我手動到工作表選取A1然後Crl+下 真的就只到A520
https://imgur.com/a/QoliSZ6
我上網看教學，那位老師也是Crl+下位置卻會到A1048576
是哪裡出了問題嗎? 或是有其他方法可行?

A520有空白壓 就會停再A520 沒問題的但你的寫法有錯唷另外一種則是遇到有隱藏你想要最後一列Lrow=Range("A" & Rows.Count).End(3).Row再用if判斷Lrow 多少就好

您的資料應該有轉換成表格，表格狀態下Carl+下會優先在表格範圍內，但目前想不到用什麼VBA解決您的問題

if Range("A1048576").End(xlUp).Row=1 then

我想到一個方式：把你的資料表做成樞紐分析表，對樞紐表作篩選，如果A2沒值就提醒

https://i.imgur.com/2UKXt5c.jpg目前只想到用公式+變動處理，但篩選選完還是要點一下任一儲存格才會執行