刚接触VBA，求助

yuquan369

sheet1是缴费信息表格，sheet2是收据打印模板。收据模板中，要把sheet1中的用人单位填写到sheet2中的缴费人的单元格中（缴费人单元格为：(D8:Q9)）
现在需要把指定行号的数据自动填充到sheet2中。sheet1的用人单位在M列，行号是需要在sheet2中AH1单元格中手动填写（备注：AH1=AG+2，AG为档案编号，和行号查数值差2）
这是我写的代码：
Sub Button27_Click()
Dim a            '定义变量a，定义变量是不是错了，到现在还没有搞清楚变量是怎么定义的。
a = Sheets("Sheet2").Range("AH1")        '把手动输入的行号赋值给变量a
Sheets("Sheet1").Activate
Range("a,8").Select   '运行时，提示这句是错的
Selection.Copy
Sheets("Sheet2").Activate
Range("D8:Q9").Select
ActiveSheet.Paste
Sheets("Sheet2").Activate
Range("D5:F6").Select
SendKeys "^{;}"
End Sub


现在不知道错哪里了，麻烦哪位帮我改改

或者有更好的办法也能达到目的
小弟在此感谢不尽

我scola

路过。。。。。

liulang0808

Range("a8")
cells（8,"a")
不知道是不是这个意思了

yuquan369

liulang0808 发表于 2019-1-11 12:37
Range("a8")
cells（8,"a")
不知道是不是这个意思了

a是我定义的变量，我把手动输入的行号数值附给了a，不是您说的A列cells(a,8)

DevilW

A8 的引用：

[a8]
Range("a8")
cells(8,1)
cells(8,"a")

yuquan369

liulang0808 发表于 2019-1-11 12:37
Range("a8")
cells（8,"a")
不知道是不是这个意思了

是不是我定义变量就错了？

yuquan369

DevilW 发表于 2019-1-11 12:41
A8 的引用：

[a8]

a是我定义的变量，我把手动输入的行号数值附给了a，不是您说的调用A8单元格。我的错误是不是我定义变量时就定义错误了？

DevilW

两个数字，那就用 Cells(a,8)  记住：变量不能上双引号

yuquan369

DevilW 发表于 2019-1-11 12:51
两个数字，那就用 Cells(a,8)  记住：变量不能上双引号

解决了，万分感谢！~谢谢您