第1个回答 2011-07-14
在VBA模块中建立下面函数：
Function zzz()
zzz = ThisWorkbook.Name
End Function
然后在单元格中输入公式=zzz()即可。追问
Function zzz()
zzz = ThisWorkbook.Name
End Function
然后在单元格中输入公式=zzz()即可。追问
不行， 我把你上面的函数
Function zzz()
zzz = ThisWorkbook.Name
End Function
复制到VBA模块中，保存返回EXCEL，在输入＝zzz(),他显示出来的是 “”#NAME?“”
没问题的，要将代码放在模块中，而不是放在Sheet或thisworkbook的代码中，如图：
本回答被提问者采纳
相似回答
