Hvordan vises tabel- eller pivottabelnavn i en celle i Excel?
Denne artikel taler om at vise en bestemt tabel eller et pivottabelnavn i en celle i Excel.
Vis tabel- eller pivottabelnavn i en celle med VBA-kode
Vis tabel- eller pivottabelnavn i en celle med VBA-kode
Følgende VBA-kode kan hjælpe dig med at vise et bestemt tabel- eller pivottabelnavn i en celle. Gør som følger.
1. Tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler. Kopier derefter under VBA-koden i modulvinduet.
VBA-kode: Vis tabel- eller pivottabelnavn i en celle
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. Tryk på andre + Q taster for at afslutte Microsoft Visual Basic til applikationer vindue.
4. Vælg en tom celle, indtast formlen =getObjName(A2) ind i formellinjen, og tryk derefter på Enter-tasten. Se skærmbillede:
Noter:
Relaterede artikler:
- Hvordan viser jeg alle tabelnavne i Excel?
- Hvordan kan man holde bord udvideligt ved at indsætte tabelrækker i et beskyttet regneark i Excel?
- Sådan omarrangeres kolonnernes placering i tabellen i Excel?
- Hvordan skjules rækker med nul værdi i pivottabellen?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
