提取工作薄及工作名表.docVIP

方法一　　常规方法 cell函数　　也可以这样取得工作表名，在任一单元格输入：=RIGHT(CELL(filename),LEN(CELL(filename))-FIND(],CELL(filename)))方法二　　取工作表名及路径=CELL(filename,$A$1)取工作簿及表名=MID(CELL(filename,$A$1),FIND([,CELL(filename,$A$1)),LEN(CELL(filename,$A$1))+1-FIND([,CELL(filename,$A$1)))取工作簿名=MID(CELL(filename,$A$1),FIND([,CELL(filename,$A$1)),FIND(],CELL(filename,$A$1))-FIND([,CELL(filename,$A$1))+1)取工作表名=MID(CELL(filename,$A$1),FIND(],CELL(filename,$A$1))+1,LEN(CELL(filename,$A$1))-FIND(],CELL(filename,$A$1)))方法三定义一个名称，简写为：mc,引用位置写入=get.cell(66)然后在任意单元格输入=mc,即可得到当前工作簿名称。定义一个名称，简写为：mcb,引用位置写入=get.cell(62)或=ge