Hogyan jelenítse meg a táblázat vagy a pivot tábla nevét az Excel egyik cellájában?
Ez a cikk arról szól, hogy egy megadott tábla vagy kimutatott tábla neve megjelenjen az Excel egyik cellájában.
Táblázat vagy pivot tábla neve jelenjen meg egy cellában VBA kóddal
Táblázat vagy pivot tábla neve jelenjen meg egy cellában VBA kóddal
A következő VBA-kód segíthet egy megadott tábla vagy kimutató tábla nevének megjelenítésében egy cellában. Kérjük, tegye a következőket.
1. megnyomni a más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja a VBA kód alatt a Modul ablakba.
VBA kód: Táblázat vagy pivot tábla neve jelenjen meg egy cellában
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. megnyomni a más + Q gombokkal lépjen ki a Microsoft Visual Basic for Applications ablak.
4. Jelöljön ki egy üres cellát, írja be a képletet =getObjName(A2) a Formula Bar-ba, majd nyomja meg az Enter billentyűt. Lásd a képernyőképet:
Megjegyzések:
Kapcsolódó cikkek:
- Hogyan lehet felsorolni az összes táblázatnevet az Excelben?
- Hogyan lehet a táblázatot kibővíteni úgy, hogy táblázat sorokat illeszt be egy védett munkalapba az Excelben?
- Hogyan lehet átrendezni az oszlopok helyzetét az Excel táblázatában?
- Hogyan lehet elrejteni a nulla értékű sorokat az elfordulási táblázatban?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!