Hur visar jag tabell- eller pivottabellnamn i en cell i Excel?
Den här artikeln talar om att visa ett angivet tabell- eller pivottabellnamn i en cell i Excel.
Visa tabell- eller pivottabellnamn i en cell med VBA-kod
Visa tabell- eller pivottabellnamn i en cell med VBA-kod
Följande VBA-kod kan hjälpa dig att visa ett angivet tabell- eller pivottabellnamn i en cell. Vänligen gör enligt följande.
1. tryck på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera sedan VBA-koden nedan till modulfönstret.
VBA-kod: Visa tabell- eller pivottabellnamn i en cell
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. tryck på andra + Q för att avsluta Microsoft Visual Basic för applikationer fönster.
4. Välj en tom cell, ange formel =getObjName(A2) in i formelfältet och tryck sedan på Enter. Se skärmdump:
Anmärkningar:
Relaterade artiklar:
- Hur listar jag alla tabellnamn i Excel?
- Hur håller jag tabellen expanderbar genom att infoga tabellrad i ett skyddat kalkylblad i Excel?
- Hur ordnar jag om kolumnernas position i tabellen i Excel?
- Hur döljer man nollvärderader i pivottabellen?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!