excel 引用sheet页名,并把sheet名写入指定的单元格中。
发布网友
发布时间：2022-04-24 06:52
共2个回答
热心网友
时间：2022-06-17 04:59
Private Sub Worksheet_Activate()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
x = x + 1
Cells(1, x) = sh.Name
Next
End Sub
事件写在总结工作表里，或者你弄成工作薄事件也行。
另外，总结表格不加进去的话，可以加个判断就可以了。
热心网友
时间：2022-06-17 04:59
批量提取工作表名：
百度经验 自定义名称 ： get.workbook
http://jingyan.baidu.com/article/0f5fb099cce54d6d8334ea2c.html
row(A1) 换成 column(B1)
