功能：

Question

我在Excelfile中有10个工作表，在最后一个工作表中我想要在单元格中获取每个工作表名称。

让我们说第1张被称为“黑色”。我希望此工作表名称显示在单元格中的工作表10中。

如何将sheetname放入带有函数的单元格中？

Answer 1

您只能使用宏或自定义功能完成您所要求的操作。我将为您提供自定义功能：

功能：

Public Function sheetName(sheetIndex As Integer) As String
    Dim wb As Workbook

    Application.Volatile True

    Set wb = Application.Caller.Worksheet.Parent

    If sheetIndex < 1 Or sheetIndex < wb.Sheets.Count Then
        sheetName = wb.Sheets(sheetIndex).Name
    Else
        sheetName = "Index Out of Range!"
    End If
End Function

使用：

将上述代码粘贴到工作簿中的模块中（如果您需要帮助，只需询问）。然后使用公式：=sheetName(TheNumberOfTheSheet)其中TheNumberOfTheSheet对于第一张表为1，对于第二张表为2，等等。

Answer 2

保存工作簿后：

=CELL("filename")

将返回工作表的完整路径。如果只需要选项卡名称，它还需要一些字符串操作，例如：

=MID(CELL("filename"),FIND("]",CELL("filename"))+1,LEN(CELL("filename")))

瑞典语版本可能是：

=EXTEX(CELL("filnamn");HITTA("]";CELL("filnamn"))+1;LÄNGD(CELL("filnamn")))

Excel用于使工作表名称显示在单元格中的功能

2 个答案:

功能：

使用：