如何在 Excel 的儲存格中顯示表格或樞紐分析表的名稱？

本文將說明如何在 Excel 的儲存格中顯示特定表格或樞紐分析表的名稱。

使用 VBA 程式碼在儲存格中顯示表格或樞紐分析表名稱

使用 VBA 程式碼在儲存格中顯示表格或樞紐分析表名稱

以下 VBA 程式碼可以幫助您在儲存格中顯示指定的表格或樞紐分析表名稱。請按照以下步驟操作。

1. 按下 Alt + F11 鍵以開啟 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中，點擊 插入 > 模組。然後，將以下 VBA 程式碼複製到模組視窗中。

VBA 程式碼：在儲存格中顯示表格或樞紐分析表名稱

Function getObjName(rng As Range) As String
'Updated by Extendoffice 20180420
    Dim xTable As ListObject
    Dim xPivotTable As PivotTable
    Dim xTableName As String
    Dim xPtName As String
    On Error Resume Next
    xTableName = ""
    xPtName = ""
    Set xTable = rng.Cells(1).ListObject
    xTableName = "Table[" & xTable.Name & "]"
    If xTable Is Nothing Then
        Set xPivotTable = rng.Cells(1).PivotTable
        xPtName = "Pivot [" & xPivotTable.Name & "]"
    End If
    getObjName = xTableName & xPtName
End Function

3. 按下 Alt + Q 鍵退出 Microsoft Visual Basic for Applications 視窗。

4. 選擇一個空白儲存格，在編輯欄(F) 中輸入公式 =getObjName(A2) ，然後按下 Enter 鍵。請參閱截圖：

注意：

相關文章：

• 如何在 Excel 中列出所有表格名稱？
• 如何在受保護的工作表中通過插入表格行來保持表格可擴展性？
• 如何在 Excel 中重新排列表格列的位置？
• 如何隱藏樞紐分析表中的零值行？