在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？