Excel VBA獲得僅列號的列范圍

Question

我需要從列號k到行從e到f的單元格范圍。 變量可能會有所不同。

有沒有一種方法可以不將列號轉換為字符串並進行其他字符串操作 ？

到目前為止，這就是我發現的內容：

Sub testRanges()
    Dim tempRange As Range
    Set tempRange = ThisWorkbook.Worksheets("setup").Columns(2)
  '  tempRange.Select  'it works fine
    Dim cell As Range
    Dim i As Integer
    i = 1
    For Each cell In tempRange.Cells
        ThisWorkbook.Worksheets("setup").Cells(i, 7).value = cell.value 'works
        i = i + 1
    Next
End Sub

但是我不知道使它僅選擇5-80行的語法

Dim e as Integer;
Dim f As Integer;
Dim k As Integer;

e=5;
f=80;
k=6;

在第六Columns(k) 。 有任何想法嗎？

Answer 1

示例：您對第2列的單元格5和6感興趣。可以使用：

With ThisWorkbook.Worksheets("setup")
    For Each cell In .Range(.Cells(5, 2), .Cells(6, 2))
        '...
    Next
End With

上面的任何數字都可以由通常為Long類型的數字變量代替。

Answer 2

如果我理解您正確的話，您希望范圍為F5：F80。（除非您具有1R1C表格式）

Sub testy()
  Dim e As Integer
  Dim f As Integer
  Dim k As Integer

  e = 5
  f = 80
  k = 6


  Range(Cells(e, k), Cells(f, k)).Select
End Sub

Answer 3

如果必須采用行和列的交集，則在VBA中，此命令為Intersect() 。

嘗試這個：

Sub Test
    Dim k as range
    set k =intersect(Rows("3:4"),columns("E"))
    k.select
End Sub