作者：绿色风
分类：
时间：2022-08-17
浏览：87
楼主
hlxz |
Q：如何用自定义函数罗列工作表名称？
A：可用如下代码实现：
- Function 工作表名称(ByVal i As Integer)
- Application.Volatile
- If i > Worksheets.Count Then
- 工作表名称 = ""
- Else
- 工作表名称 = Worksheets(i).Name
- End If
- End Function
有不同的解法 不要小气哦！！
 |
2楼
omnw |
[code]sub 工作表名称()
dim i as integer
for i=2 to worksheets.count
worksheets(1).cells(i-1,1)=worksheets(i)
next i
end sub[/code] |
3楼
JOYARK1958 |
謝謝提供.................................下載學習 |
4楼
lrlxxqxa |
学习。
当工作表有更新后，F9刷新即可显示。
 test.rar
|
5楼
paul001 |
学习。
当工作表有更新后，F9刷新即可显示。
=====这个蛮好 |
6楼
yaoxuhuijsz |
会了 谢谢 |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一