问在Excel VB中获取当前单元格

EN

您是否尝试过：

对于一个单元格：

ActiveCell.Select

对于多个选定的单元格：

Selection.Range

例如：

Dim rng As Range
Set rng = Range(Selection.Address)

如果你想用一个动态生成的字符串来获取一个范围，那么你只需要像这样构建这个字符串：

Range(firstcol & firstrow & ":" & secondcol & secondrow).Select

这可能无助于直接回答你的问题，但在尝试使用动态范围时，我发现它很有用，可能会对你有所帮助。

假设在您的工作表中，单元格A1:C3中有数字100到108：

          A    B    C  
1        100  101  102
2        103  104  105
3        106  107  108

然后，要选择所有单元格，可以使用CurrentRegion属性：

Sub SelectRange()
Dim dynamicRange As Range

Set dynamicRange = Range("A1").CurrentRegion

End Sub

这样做的好处是，如果您向数字块添加新的行或列(例如109、110、111)，则CurrentRegion将始终引用扩大的范围(在本例中为A1:C4)。

我在我的VBA代码中使用了相当多的CurrentRegion，并且发现它在处理动态大小的范围时非常有用。此外，它还避免了在代码中硬编码范围。

最后，在我的代码中，您将看到我使用A1作为CurrentRegion的引用单元格。无论引用哪个单元格，它都可以正常工作(例如，尝试:用B2替换A1 )。原因是CurrentRegion将根据参考单元格选择所有连续的单元格。