Как отобразить имя таблицы или сводной таблицы в ячейке в Excel?
В этой статье говорится об отображении указанной таблицы или имени сводной таблицы в ячейке в Excel.
Отображение имени таблицы или сводной таблицы в ячейке с кодом VBA
Отображение имени таблицы или сводной таблицы в ячейке с кодом VBA
Следующий код VBA может помочь вам отобразить указанную таблицу или имя сводной таблицы в ячейке. Пожалуйста, сделайте следующее.
1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули. Затем скопируйте ниже код 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 Function3. нажмите другой + Q ключи для выхода из Microsoft Visual Basic для приложений окно.
4. Выберите пустую ячейку, введите формулу. =getObjName(A2) в панель формул и нажмите клавишу Enter. Смотрите скриншот:
Заметки:
Статьи по теме:
- Как перечислить все имена таблиц в Excel?
- Как сохранить расширяемость таблицы, вставив строку таблицы в защищенный лист в Excel?
- Как изменить порядок столбцов в таблице в Excel?
- Как скрыть строки с нулевым значением в сводной таблице?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
