excel - Excel VBA中的n列扩展行选择

Question

这让我很困惑，因为通常我会使用数字作为列，但是，对于这种情况，我必须使用字母作为列。

例如，T1现在我想扩展 n 列。

• n = 10，则范围为T1:T11
• n = 20，则范围为T1:T22

它是列然后我可以使用.resize，我可以使用什么方法而不是调整大小来获得我想要的？

Answer 1

我不确定你想做什么。要调整列的大小，这应该有效：

Dim rng As Range
Set rng = Sheet1.Range("t1:t11")
rng.Resize(, 10).Select

如果您尝试做行，这似乎适用于我的测试表：

Dim rng As Range
Set rng = Sheet1.Range("t1:t11")
rng.Resize(rng.Rows.Count + 10, 1).Select

我解释你的问题的第三种方式：

Dim RowCounter As Long
RowCounter = 20
Range("T1:T" & RowCounter + 1).Select

这是另一种方式：

Dim rng As Range
Dim RowExtend As Long

RowExtend = 20

Set rng = Sheet1.Range("t1")
rng.Resize(rng.Rows.Count + RowExtend, 1).Select

希望这四种方法中的一种能让你接近。如果没有，请澄清你的问题，我会继续解决它。

Answer 2

将当前选择扩展到 LEFT 怎么样？例如：当前选择是 E10:E100 ，我需要将选择向左扩展 2 列，到 C10:E100 吗？