VBA编码求助，自定义函数不正确。不知道哪里出问题了。

显示全部楼层 · 2011-6-9 01:40:53

Function Sheetcount()
Sheetcount = ThisWorkbook.Sheets.Count
End Function

千问 · 2011-6-9 01:40:53

请问楼主是如何使用这个自定义函数的？在什么地方看到这个错误信息的？如果是想在公式中使用这个自定义函数的话，需要先插入一个“模块”，然后在把这段代码放到模块中。这样公式列表中才能看到这个Sheetcount函数。...

千问 · 2011-6-9 01:40:53

代码没问题，我用了，可以得出正确结果，请确定一下事项：1、自定义函数要放到模块里面，不是sheet表的代码内2、打开excel的宏选项，即可以运行宏程序...

千问 · 2011-6-9 01:40:53

没问题！！如果你出错，请确认：1、你的确在自定义中正确输入该代码。2、在单元格输入中，没有使用“全角”的字符或有空格。3、可以在“查看”或“编辑”宏时，复制粘贴上述代码。...

千问 · 2011-6-9 01:40:53

调用测试过没有问题的呀...