Cum se afișează numele tabelului sau tabelului pivot într-o celulă din Excel?
Acest articol vorbește despre afișarea unui tabel specificat sau a unui nume de tabel pivot într-o celulă din Excel.
Afișați numele tabelului sau al tabelului pivot într-o celulă cu cod VBA
Afișați numele tabelului sau al tabelului pivot într-o celulă cu cod VBA
Următorul cod VBA vă poate ajuta să afișați un tabel specificat sau numele tabelului pivot într-o celulă. Vă rugăm să faceți următoarele.
1. apasă pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra Module.
Cod VBA: Afișați numele tabelului sau tabelului pivot într-o celulă
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. apasă pe Alt + Q tastele pentru a ieși din Microsoft Visual Basic pentru aplicații fereastră.
4. Selectați o celulă goală, introduceți formula =getObjName(A2) în bara de formule și apoi apăsați tasta Enter. Vedeți captura de ecran:
notițe:
Legate de articole:
- Cum se listează toate numele tabelelor în Excel?
- Cum să păstrați tabelul extensibil inserând rândul tabelului într-o foaie de lucru protejată în Excel?
- Cum să reordonați poziția coloanelor din tabel în Excel?
- Cum se ascunde rândurile cu valoare zero în tabelul pivot?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
