為什麼這篇Vbcr vba鄉民發文收入到精華區:因為在Vbcr vba這個討論話題中,有許多相關的文章在討論,這篇最有參考價值!作者supisces (被~~~切~~~八~~~段)看板Office標題[算表] VBA 中尋找最後...
軟體: Excel
版本: 2010
Google 後查到以下程式碼可以找到最後一列的位置
=============================================================
Dim myRange As Range
Set myRange = ThisWorkbook.Sheets(1).Range("B65536").End(xlUp) '表示在B欄
的最後一列
myRange.Select
Debug.Print myRange.Value
Debug.Print myRange.Address
Debug.Print myRange.Row
Debug.Print myRange.Column
MsgBox "值 : " & vbTab & myRange.Value & vbCr & _
"位置: " & vbTab & myRange.Address & vbCr & _
"列數: " & vbTab & myRange.Row & vbCr & _
"行數: " & vbTab & myRange.Column & vbCr
Set myRange = Nothing
==============================================================
但是經測試後發現,
這個方式並不管儲存格是否為空白.
如果最後一列的儲存格中有公式,
但是結果為空白,
請問該如何寫 VBA?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 96.55.113.197
謝謝您提供的方法,
但是試了以後還是不行..
我把問題再描述清楚一點:
A1=left(B1,3)
A2=left(B2,3)
...
A50=left(B50,3)
在某個時間點得到 A1~A20 有數值,
A21~A50 是空白.
我想選擇最後有數值的位置,
在這個例子應該是 --> A20,
但是試了很多方法, 都得到 --> A50..
還是我應該想辦法讓空白的儲存格不存在公式呢?
※ 編輯: supisces 來自: 96.55.113.197 (02/11 01:00)