选择不同的列范围Excel VBA

因此，在excel vba中，我尝试选择一个范围，但每次都选择一个不同的范围。我有一个循环，但我想知道如何编写代码来更改范围。这就是单个范围的外观

Range("B7").Select

有没有办法用整数而不是像“B7”这样的字符串来实现这一点

i、 e

我需要它来选择一列。如有任何建议，将不胜感激

---

谢谢

如果您只需要选择一个单元格：

Cells(y, x)

但因为您必须选择更多：

Dim testRange As Range

   Set testRange = Worksheets("Sheet1").Range(Worksheets("Sheet1").Cells(1, 1), Worksheets("Sheet1").Cells(100, 1))

   testRange.Select 'Optional
   testRange = "If you read this, you are awsome!"

包括您想要一个循环：

Dim testRange As Range
Dim x as Integer

  For x = 1 To n 'n = whatever you want
     Set testRange = Worksheets("Sheet1").Range(Worksheets("Sheet1").Cells(1, x), Worksheets("Sheet1").Cells(100, x))

     testRange.Select 'Optional
     testRange = "If you read this, you are even more awesome!" 'Fills 100x100 Cells with this text
  Next x

---

我希望这会有所帮助：）

如果您只需要选择一个单元格：

Cells(y, x)

但因为您必须选择更多：

Dim testRange As Range

   Set testRange = Worksheets("Sheet1").Range(Worksheets("Sheet1").Cells(1, 1), Worksheets("Sheet1").Cells(100, 1))

   testRange.Select 'Optional
   testRange = "If you read this, you are awsome!"

包括您想要一个循环：

Dim testRange As Range
Dim x as Integer

  For x = 1 To n 'n = whatever you want
     Set testRange = Worksheets("Sheet1").Range(Worksheets("Sheet1").Cells(1, x), Worksheets("Sheet1").Cells(100, x))

     testRange.Select 'Optional
     testRange = "If you read this, you are even more awesome!" 'Fills 100x100 Cells with this text
  Next x

---

我希望这会有所帮助：）

如果您知道单元格相对于起始行的位置，可以使用偏移量执行以下操作：

dim rng as Range
dim i as integer
set rng = range("B7")
for i=0 to 10
   rng.offset(0,i).select
next i

---

查找偏移量以了解如何修改此设置以满足您的需要

如果您知道单元格相对于起始行的位置，则可以使用偏移量执行以下操作：

dim rng as Range
dim i as integer
set rng = range("B7")
for i=0 to 10
   rng.offset(0,i).select
next i

查找偏移量以了解如何修改此项以满足您的需要

列（1）。选择单个单元格的

单元格（[行]，[列]）（如

单元格（7，2）

将是B7）考虑阅读。使用

。选择

可能会导致代码中出现问题。如果您试图选择整个列，@xQbert肯定会起作用。假设您想更改范围，但只想循环一列中的单元格，您可以使用类似于

range（“B”&i）

的内容@xQbert在上面，直接使用列。您也可以执行

Range（“B7”）.entireclumn

或使用变量

Dim myCol，只要长//myCol=Range（“B7”）.Column

，但您并不“真的”想要选择列，而是使用该列执行一些操作。查看我链接到的线程，它将为您省去许多麻烦，并帮助您的代码运行得更快。

列（1）。为单个单元格选择
，
单元格（[row]，[column]）
（如
单元格（7，2）
将是B7）考虑阅读。使用
。选择
可能会导致代码中出现问题。如果您试图选择整个列，@xQbert肯定会起作用。假设您想更改范围，但只想循环一列中的单元格，您可以使用类似于
range（“B”&i）
的内容@xQbert在上面，直接使用列。您也可以执行
Range（“B7”）.entireclumn
或使用变量
Dim myCol，只要长//myCol=Range（“B7”）.Column
，但您并不“真的”想要选择列，而是使用该列执行一些操作。查看我链接到的线程，它将为您省去许多麻烦，并帮助您的代码运行得更快。