如何用脚本实现excel所表sheet页的读取
1、如下所示,表里面有很多表单。我们希望获取表单的名字。
2、运行宏时,如果出现如下提示,则需要启用宏。
3、如果对内容了解,可以点击左上角的【启用宏】按钮实现快速启用。
4、为了获取表格中所有表单名称,需要添加一个按钮。
5、打开VBA编辑器,输入如下代码:Sub 岳蘖氽颐按钮1_Click()Dim sht As Worksheet, arr()荑樊综鲶, i%For Each sht In Worksheetsi = i + 1ReDim Preserve arr(1 To i)arr(i) = sht.NameNextRange("a1").Resize(i) = WorksheetFunction.Transpose(arr)End Sub
6、点击按钮执行,就能够达到我们想要的结果了。
声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
阅读量:77
阅读量:23
阅读量:43
阅读量:89
阅读量:67