vba - Excel VBA范围变量连接

标签 vba excel excel-formula ms-word

我有以下 Excel VBA 代码块。
现在我必须把它们放在一个循环中并参数化它们。

Countruz2 = 2
 Countruz3 = Countruz2 + 13

Range("A2:A15").PasteSpecial (xlPasteValues)

以下是我尝试过的 - 3 个变体都失败了:无效使用属性错误。
'    Range ("A" & Countruz2 & ":" & "A" & Countruz3)                                    ' Invalid Use of Property

'    Range ("A" & Countruz2 & ":A" & Countruz3)                                         ' Invalid Use of Property

'    Range ("A" & Countruz2 & ":A" & Countruz2 + 13)                                    ' Invalid Use of Property

我们如何处理 Excel VBA 中 Range 函数中的此类连接和参数化?

感谢您提前提供的所有帮助。

编辑 :

像这样连接它后让它工作 -

X = "A"& Countruz2 & ":"& "A"& (Countruz2 + 13)
调试.打印 X
Range(X).PasteSpecial (xlPasteValues)

还有其他优雅/更简单的方式吗?

最佳答案

尝试这个

Countruz2 = 2
Countruz3 = Countruz2 + 13

Range("A" & Countruz2 & ":A" & Countruz3).PasteSpecial (xlPasteValues)

关于vba - Excel VBA范围变量连接,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/51271859/

相关文章:

vba - Internet Explorer VBA 自动化错误 : The object Invoked has disconnected from its clients

excel - Worksheet.Protect AllowDeletingRows 不允许删除行

excel - 出现错误时如何中断?

excel - 如果单元格包含值,则拉出包含相同发票编号的所有行

vba - Excel VBA 函数仅在更改时更新

vba - 使用函数和 With/End With 访问类对象

vba - 复制和转发正文中包含图像的电子邮件

vba - 尝试删除 VBA 中的单元格范围时出错

vba - 声明要在 Module1 中初始化并在 UserForm 模块中使用的变量

EXCEL - 如果列中的单元格包含列表中的任何字符串(特定于每一行的列表),则取平均值