表名如何用变量替代

ngkz · 发表于 2016-1-22 14:16

请问这里的表变量如何写才可以？谢谢大侠！
我希望在“汇总”里将每个月的工资和统筹汇总
Sub 宏2()
'
Dim r
Dim i%

For r = 4 To 11
For i = 1 To 12
Cells(r, 2 * i + 1) = Application.Evaluate("=IF(ISNA(VLOOKUP(" & Cells(r, 2).Address & ",Sheets（i)!$B$2:$N$28,6,FALSE)),0,(VLOOKUP(" & Cells(r, 2).Address & ",Sheets(i)!$B$2:$N$28,6,FALSE)))")
Next i
Next r
End Sub

ngkz · 发表于 2016-1-22 16:25

请求帮助！

ngkz · 发表于 2016-1-25 14:24

求求高手！！！帮助解决吧，这个很难吗？？？

		自动登录	找回密码
密码			免费注册

[求助] 表名如何用变量替代