[VBA] 常用程式碼系列15-依據迴圈依序選取特定範圍的列－問問蓮蓬頭

[說明]

依據迴圈依序選取特定範圍的列 'X只是一個代碼，可自由命名，或依自己的程式碼內容自行調整。

[程式碼]

Sub JS() '依據迴圈自動選取特定範圍的列

Range("B1").Select '先尋找一欄，其下的各列儲存格到資料最後一列均沒有空白，定點選該欄的第一格的資料儲存格，本範例以B欄為例

X = Selection.End(xlDown).Row '取得最後一列值，並將X設定為該值，X只是一個代碼，可自由命名，或依自己的程式碼內容自行調整。

For I = 2 To X '這邊假設資料是從第二列開始(不含抬頭)，並到資料的最後一列

Range(Cells(I, 2), Cells(I, 3)).Select '選取範圍，Cells如何使用，請參閱特別說明處

Next I

End Sub

[特別說明]

Range(Cells(I, 2), Cells(I, 3))，第一個Cells是資料範圍的最左邊的位置，第二個Cells是資料範圍最右邊的位置。
各自Cells裡面均有兩個值，第一個值代表的是列值、第二個代表的是欄值。
解讀第一個Cells(I, 2)，先說明起始點都是以儲存格A1為起始點來計算，故假設當時的迴圈 I=2，那Cells(I, 2)等於是第二列的第二欄，也就是儲存格B2的位置
同理Cells(I, 3)等於是第二列的第三欄，也就是儲存格C2的位置
透過迴圈選取到特定儲存格範圍後，可在範圍儲存格後面再加入其他的執行動作
如對選取到的儲存格範圍進行判斷某條件式後，符合條件，進行複製動作之後，自動選取到別的SHEET後，貼到特定的範圍。
如對選取到的儲存格範圍進行判斷某條件式後，符合條件，進行整列的資料刪除。

謝謝您閱讀了我的文章，若您喜歡我的文章，希望您幫我按個讚，也幫忙分享給需要的朋友或其他平台，謝謝。