取工作簿及表名 =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函数 也可以这样取得工作表名,在任一单元格输入: =RIGHT(CELL("filename"),LEN(CELL("filename"))-FIND("]",CELL("filename"))) 方法二 取工作表名及路径=CELL("filename",$A$1) 取工作簿及表名 =MID(CELL("filename",$A$1),FIND("[",CELL("filename",$A$1)),LEN(CE...
1 首先，确保当前工作簿已经保存。若未保存，可以按下组合快捷键Ctrl+S进行保存。2 其次，在单元格中输入公式=CELL("filename")，如下图所示 3 从步骤2中的公式结果可以看出当前单元格所在的工作表的名称“Sheet1"已经包含在公式的结果中了，如下图所示 4 在A2单元格中输入公式=MID(A1,FIND("]",A1)+1,2...
1. EXCEL中获得工作表(sheet)的名称: =MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1))+1,LEN(CELL("filename",$A$1))-FIND("]",CELL("filename",$A$1))) 2. Excel 工作簿(文件)名 (WorkBook) =MID(CELL("filename",$A$1),FIND("[",CELL("filename",$A$1)),FIN...
1、如下图所示，在当前工作表的任意单元格输入=cell( 会得到提示，我们选择filename 第一个参数选择filename就是表示返回当前工作表的路径，我们就是用路径来间接获取工作表名称的。2、选择了filename后输入逗号接着输入第二个参数 这里需要详细说一下cell函数的第二个参数，由于很重要，所以多啰嗦两句，请耐心看完...
2 在弹出的对话框1处输入“sheet”，并删除在对话框的2处原有的信息 3 把公式“=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),)&T(NOW())”复制粘贴进对话框2处，并点击确认 4 重复以上操作，点击“定义名称”，进入对话框，在1处输入“sheetname”,并把公式“=LOOKUP(ROW(INDIRECT("1:"&...
1.在单元格中输入以下公式:=CELL('filename') 2.按下回车键,即可在该单元格中显示当前工作簿的完整路径和名称。 3.为了只显示工作簿名称,可以进一步修改公式为:=MID(CELL('filename'),FIND('[',CELL('filename'))+1,FIND(']',CELL('filename'))-FIND('[',CELL('filename'))-1) 4.按下回车键...
Sub SearchSheetName() Dim xName As String Dim xFound As Boolean xName = InputBox("Enter sheet name to find in workbook:", "Sheet search") If xName = "" Then Exit Sub On Error Resume Next ActiveWorkbook.Sheets(xName).Select xFound = (Err = 0) On Error GoTo 0 If xFound Then ...
1、定义名称sheetname,公式=REPLACE(GET.DOCUMENT(1),1,FIND("]",GET.DOCUMENT(1)),)&T(NOW()) 2、在单格中输入=sheetname,则单元格显示所在工作表的表名。 3、用途 (1)我们要做很多单位的报表,格式一样,只是单位名称不同 (2)比如表头为江苏分公司,而表页也是江苏分公司,当我们再做另一个单位的表...
取工作表名及路径=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(...