3
Dim VAR1, VAR2, VAR3, VAR4, AS variant

VAR1 = Worksheets("Sheet3").Cells(3, "J").Value 
VAR2 = Worksheets("Sheet3").Cells(3, "K").Value 
VAR3 = Worksheets("Sheet3").Cells(3, "L").Value 
VAR4 = Worksheets("Sheet3").Cells(3, "M").Value

=sheet1.range(VAR1,VAR2).COPY
=Sheet3.range(VAR2,VAR4).Pastespecial

对于上述内容,我在 Var1 Var2...Var4 中给出了单元格编号

是否可以使用两个变量定义单元格位置,

Var1=B
Var2=5

并以某种方式将它们组合起来得到 B5,我想在宏本身中执行此操作。

4

1 回答 1

3

你可以。VBA 允许您在范围分配中连接字符串。在这种情况下,它看起来像:

Sub test()
Dim Var1 As Variant
Dim Var2 As Variant
Dim rng As Excel.Range

Var1 = "B"
Var2 = "5"
Set rng = ActiveSheet.Range(Var1 & Var2)
End Sub
于 2012-12-08T22:42:01.780 回答