VBA：获取工作簿中所有表的名称、地址

####一、目的
一个工作簿中有很多的表，想提取所有表的名称和地址，方便后期公式的使用
####二、方法
1、使用VBA代码

Sub 提取所有工作表的名称()For Each x In Sheetsk = k + 1  'k可以不用定义，因为VBA中可以默认变量类型为variant'Cells(k, 1) = x.Name   '表的名称纵向排列Cells(1, k) = x.Name   '表的名称横向排列If k = ThisWorkbook.Sheets.Count - 1 Then Exit For '可以控制显示的表的名称的数量Next
End Sub

2、excel公式
a. 在A1单元格输入=CELL("filename")获得路径和表名；
b1.在A2单元格输入=MID(A1,FIND("]",A1)+1,99)摘出表名
b2.或者用“数据”—“分列”–“]”分出表名

3、定义名称（如定义名称为“你好”）
a. 定义名称“你好”=index(get.workbook(1),row(A1)&T(NOW())
b. 在A1单元格输入=IFERROR(HYPERLINK(你好&"!A1",MID(你好,FIND("]",你好)+1,99)),"")
有表的名称，并且有链接；

4、定义名称2（如定义名称为“不好”）
a. 定义名称“不好=get.workbook(1)
b1. 在A1单元格输入=transpose(不好)必须选中多个单元格然后按ctrl+shift+enter三键进行数组运算；
b2. 在A1单元格输入=INDEX(不好,ROW(A1)&T(NOW()))
c. 用“数据”—“分列”–“]”分出表名

Application.ActiveWorkbook.Path 只返回路径
Application.ActiveWorkbook.FullName 返回路径及工作簿文件名
Application.ActiveWorkbook.Name 返回工作簿文件名

VBA：获取工作簿中所有表的名称、地址相关推荐

如何通过 vba 获取工作簿所有sheet的名称给出代码示例
你可以使用下面这段代码来获取Excel工作簿中所有sheet的名称:Sub 获取工作簿Sheet名称() Dim i As Integer For i = 1 To Sheets.Count Debu ...
VBA将工作簿中的所有工作表的内容输出到一个工作表中
主体是对该工作簿中所有的工作表进行遍历,然后将内容依次输出到一个工作表中. 下面看代码: Rem 将多个工作表中的内容汇总到一个工作表中 Sub collect()Rem 定义要循环的工作表和拿来去循 ...
通过VBA将一个工作簿中的多个工作表拆分为多个工作簿,以工作表名称命名工作簿
前提:电脑上装有office2007或office2013等,WPS不行. 1.如果你有现成的一个工作簿含有多个工作表的文件,想分成多个工作簿的话, 可以通过office2007或office2013 ...
update两个表中的同一字段的数据_用Python实现多个工作簿中的数据按列合并到同一个工作表中...
1.需求描述现在有三个工作表,如下: 在这里插入图片描述并且每个工作表中的内容如下: 在这里插入图片描述需要将这三个工作簿中的分数这一列合并到一起,最终实现效果如下图: 在这里插入图片描述 2. ...
Python+Excel系列：案例三：批量重命名一个工作薄中的所有工作表、批量重命名一个工作簿中的部分工作表
文章目录批量重命名一个工作薄中的所有工作表批量重命名一个工作簿中的部分工作表批量重命名一个工作薄中的所有工作表例:把table文件夹下一个工作簿中所有工作表名中的"销售"二 ...
用Python实现多个工作簿中的数据按列合并到同一个工作表中
1.需求描述现在有三个工作表,如下: 并且每个工作表中的内容如下: 需要将这三个工作簿中的分数这一列合并到一起,最终实现效果如下图: 2.实现代码 ''' 遇到问题没人解答?小编创建了一个Pytho ...
在Excel工作簿中显示网络图片
If you add pictures to an Excel workbook, the file size can increase pretty quickly. And if you're u ...
Excel 2010 VBA 入门 067 导入多个工作簿中的工作表
目录示例实现代码导入多个工作簿中的工作表 Application. ScreenUpdating属性示例如图所示,在同一个目录下有多个工作表名称相同的工资汇总月报.现希望通过VBA建立该多个 ...
extjs中store获取后台数据_Excel实战技巧64：从工作簿中获取数据（不使用VBA）
学习Excel技术,关注微信公众号: excelperfect 这是在研读<Escape From Excel Hell>时学到的技术,从本工作簿中或者其他工作簿中获取所需要的数据,以便于 ...

VBA：获取工作簿中所有表的名称、地址

VBA：获取工作簿中所有表的名称、地址相关推荐

最新文章

热门文章