在Excel VBA中按n列扩展行选择

Question

这让我感到困惑，因为通常我会在列中使用数字，但是在这种情况下，我必须在列中使用字母。

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

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

它是列，然后我可以使用.resize，可以使用什么方法代替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？