excel vba range row from variable

Question

Мне нужно получить диапазоны от предварительно заданных столбцов и строки от переменной. Если я попытаюсь получить этот диапазон вручную, все будет работать. Как получить тот же диапазон с помощью переменной? Как я получаю от:

Dim j As Integer 
j = 20 

MsgBox Union(Sheets("Temp").Range("H10:H20"), _ 
      Sheets("Temp").Range("K10:K20")).Address 

... к чему-то вроде этого: (только что он работает?)

MsgBox Union(Sheets("Temp").Range("H10:H" & j), _ 
      Sheets("Temp").Range("K10:K" & j)).Address 

Answer 1

Здесь вы идете:

Option Explicit 

Public Sub TestMe() 
    Dim j As Long 
    j = 20 

    MsgBox Union(Sheets(1).Range("H10:H" & j), _ 
       Sheets(1).Range("K10:K" & j)).Address 

End Sub 

Результат:

Answer 2

Я думаю, что вы спрашиваете, как вы меняете j (20) в динамическую переменную? если да, то, как это будет делать:

Option Explicit 

Public Sub TestMe() 
    Dim j As Long 
    j = Range("H10").End(xlDown).Row 

    MsgBox Union(Sheets(1).Range("H10:H" & j), _ 
       Sheets(1).Range("K10:K" & j)).Address 

End Sub 

Пожалуйста, обратите внимание: это есть пустая ячейка в столбце H, то j будет строка непосредственно над ним - работой вокруг этого будет j = Range("H" & Columns("H:H").Rows.Count).End(xlUp).Row