在Excel VBA中,如何在公式中表达变量的工作表名

在ExcelVBA中,如何在公式中表达变量的工作表名,如:我想在一个工作表的单元格中写入工作簿中倒数第二个工作表单元格的变量,怎么表达?我是这么写的:Setan=Shee... 在Excel VBA中,如何在公式中表达变量的工作表名,如:
我想在一个工作表的单元格中写入工作簿中倒数第二个工作表单元格的变量,怎么表达?
我是这么写的:
Set an = Sheets(Sheets.Count - 1)
Sheets(Sheets.Count - 3).Select
Cells(4, 5).Select
ActiveCell.FormulaR1C1 = "=an!R[2]C[2]"
此时an不认,什么原因,应该如果写?
我后来这么写:
an = Sheets(Sheets.Count - 1).name
Sheets(Sheets.Count - 3).Select
Cells(4, 5).Select
ActiveCell.FormulaR1C1 = "=an!R[2]C[2]"
an也不认,到底什么原因,应该如果写?
Set an = Sheets(Sheets.Count - 1)
Sheets(Sheets.Count - 3).Select
Cells(4, 5).Select
an.Range("a16") = "abc"
此时是认的,但表达公式时就不认了,究竟问题出在哪里?请高手帮助解答!谢谢!
ActiveCell.FormulaR1C1 = “an”!R[2]C[2] 也不行!请各位高手测试后,成功后再作解答!不要信口开河,凭空想象,谢谢各位高手给个可行得通的准确答案!!!谢谢啦!各位高手!
回答者: yjhitxu1132的方法在同一工作簿中可以,如果在另一个工作簿写入公式如何表达?
假设:写代码的工作簿为:AAA ;要写入公式"=" & an & "!R[2]C[2]"的工作簿为:BBB ,那么,【 ActiveCell.FormulaR1C1 = "=" & an & "!R[2]C[2]"】是否可以写成:【 ActiveCell.FormulaR1C1 ="=Workbooks("BBB"). "=" & an & "!R[2]C[2]"】,但是这样,我试了,还是不能运行!请高手指教!!!
*****AAA在D盘的MYwork目录;BBB在G盘的work目录
我希望在操作的时候,在G盘的work目录的BBB工作簿不要打开,而指定它的路径,如何写代码?请高手指教!!!
展开
 我来答
yjhitxu1132
2010-12-19 · TA获得超过2001个赞
知道小有建树答主
回答量:1735
采纳率:0%
帮助的人:1001万
展开全部
Sub dfsa()
an = Sheets(Sheets.Count - 1).Name
Sheets(Sheets.Count - 3).Select
ActiveSheet.Cells(4, 5).Select
ActiveCell.FormulaR1C1 = "=" & an & "!R[2]C[2]"
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
太极健1969
2010-12-19 · TA获得超过9034个赞
知道大有可为答主
回答量:8668
采纳率:69%
帮助的人:3624万
展开全部
ActiveCell.FormulaR1C1 = "=" & an & "! R[2]C[2]"
这是表达引用an变量的方法,具体指定单元格要您自己写位置了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
hh_wzj
2010-12-19 · TA获得超过570个赞
知道小有建树答主
回答量:537
采纳率:0%
帮助的人:486万
展开全部
an放在“”内,是字符格式。
ActiveCell.FormulaR1C1 = an!R[2]C[2]
这样用试试
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
wwj805
2010-12-19 · TA获得超过1412个赞
知道小有建树答主
回答量:692
采纳率:55%
帮助的人:394万
展开全部
an=sheets.count

Formula后面加变量格式:" & an & "
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友95d4c7988
2010-12-19 · 超过20用户采纳过TA的回答
知道答主
回答量:282
采纳率:0%
帮助的人:74.7万
展开全部
哥们!这个太专业了,不懂,过来灌水的。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式