Як відобразити ім'я таблиці або зведеної таблиці в комірці в Excel?
У цій статті йдеться про відображення вказаної таблиці або назви зведеної таблиці в комірці в Excel.
Відображення імені таблиці або зведеної таблиці в комірці з кодом VBA
Відображення імені таблиці або зведеної таблиці в комірці з кодом VBA
Наступний код VBA може допомогти вам відобразити вказану назву таблиці або зведеної таблиці в комірці. Будь ласка, виконайте наступне.
1 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі. Потім скопіюйте код 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 для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
