vbaで指定したセルより下の行を指定する方法について vbaの質問です。 例えば、｢C6｣セルより下

vbaで指定したセルより下の行を指定する方法について

vbaの質問です。

例えば、｢C6｣セルより下の列を選択するにはどうすればいいのでしょうか？

range()でC6を指定して、C6以下の最下行まで指定したいのですが…

よろしくお願いします。

No.2 回答者： tom04 回答日時： 2018/10/16 13:22

こんにちは！

一例です。

Sub Sample1()
　Dim lastRow As Long, myRng As Range
　　If Selection.Count = 1 Then
　　　lastRow = Cells(Rows.Count, Selection.Column).End(xlUp).Row
　　　　If lastRow > Selection.Row Then
　　　　　Set myRng = Range(Selection, Cells(lastRow, Selection.Column))
　　　　　myRng.Select
　　　　End If
　　Else
　　　MsgBox "1セルのみ選択してください"
　　End If
End Sub

こんな感じではどうでしょうか？m(_ _)m

No.1 回答者： mabuterol 回答日時： 2018/10/16 12:05

C6 を含んで良いならば

Range(Cells(6, 3), Cells(6, 3).end(xldown))