Kako prikazati ime tabele ali vrtilne tabele v celici v Excelu?
Ta članek govori o prikazovanju določenega imena tabele ali vrtilne tabele v celici v Excelu.
Prikaži ime tabele ali vrtilne tabele v celici s kodo VBA
Prikaži ime tabele ali vrtilne tabele v celici s kodo VBA
Naslednja koda VBA vam lahko pomaga prikazati določeno ime tabele ali vrtilne tabele v celici. Naredite naslednje.
1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte spodnjo kodo VBA v okno modula.
Koda VBA: prikaže ime tabele ali vrtilne tabele v celici
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. Pritisnite druga + Q tipke za izhod iz Microsoft Visual Basic za aplikacije okno.
4. Izberite prazno celico, vnesite formulo =getObjName(A2) v vrstico formule in pritisnite tipko Enter. Oglejte si posnetek zaslona:
Opombe:
Sorodni članki:
- Kako našteti vsa imena tabel v Excelu?
- Kako ohraniti razširljivost tabele z vstavljanjem vrstice tabele v zaščiteni delovni list v Excelu?
- Kako preurediti položaj stolpcev v tabeli v Excelu?
- Kako skriti vrstice z ničelno vrednostjo v vrtilni tabeli?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!