文化EXCEL高階函數與大數據 VBA 自動化第4次上課(152分別擷取長寬高資料剖析&錄製巨集步驟說明與修改 VBA 程式&註解與關閉訊息提示與Application物件&範例 ... ... <看更多>
vba選取到最後一列 在 [算表] vba 選定範圍複製然後貼到選定的最後一列 的推薦與評價
軟體:excel版本:2013程式碼如下Dim maxR As Long Dim sh As Worksheet Set sh = ActiveSheet maxR = 2 While sh.Cells(maxR, 1).Value <> "" maxR = maxR + 1 Wend ... ... <看更多>
vba選取到最後一列 在 Re: [算表] VBA 中尋找最後一列非空白位置並選取範圍 - PTT Web 的推薦與評價
爬文發現想用VBA 中尋找最後一列非空白位置並選取範圍參考了S大的說明可用迴圈if判斷的方式尋找到最後一列的位置但完整程式碼該怎麼套以選取範圍新手 ... ... <看更多>
vba選取到最後一列 在 Re: [算表] VBA 中尋找最後一列非空白位置並選取範圍- 看板Office 的推薦與評價
爬文發現想用VBA 中尋找最後一列非空白位置並選取範圍參考了S大的說明可用迴圈if判斷的方式尋找到最後一列的位置但完整程式碼該怎麼套以選取範圍新手還試不出來可以請 ... ... <看更多>
vba選取到最後一列 在 Re: [算表] VBA 中尋找最後一列非空白位置並選取範圍- 看板Office 的推薦與評價
爬文發現想用VBA 中尋找最後一列非空白位置並選取範圍
參考了S大的說明可用迴圈if判斷的方式尋找到最後一列的位置
但完整程式碼該怎麼套以選取範圍新手還試不出來
可以請版上高手稍微示範一下嗎?
感謝!!
目前的程式碼如下:
Dim myRange As Range
For i = myRange.Row To 1 Step -1
If Range("A" & i) <> "" Then Exit For
Next
Set myRange = ThisWorkbook.Sheets("資料產出").Range("a2",
ActiveSheet.Range("a1".)Range("A" & i).End(xlToRight).End(xlToRight).End(xlToRight))
myRange.Select
End Sub
※ 引述《supisces (被~~~切~~~八~~~段)》之銘言:
: 軟體: 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), 來自: 114.24.150.75
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1524972052.A.FE0.html
我是想選取一個範圍
我的想法是先尋找A欄中最個一個非空白的值儲存格
再往右選取到最右邊那欄
現在主要卡在判斷尋找最後一個非空白值的儲存格後
該怎麼套用的選取的範圍
感謝!
※ 編輯: nash30113 (114.24.150.75), 04/29/2018 11:39:25
目前套用會選到有公式的空白儲存格
所以才會用S大的建議套用if的判斷式
但不知道判斷後該怎麼套進選取範圍
實例如附檔 我想選取檔案中Sheets"資料產出"非空白儲存格範圍(如A2:C6)
檔案連結:https://goo.gl/jtLdXw
※ 編輯: nash30113 (114.24.150.75), 04/29/2018 12:01:53
... <看更多>