Bagaimana cara menampilkan nama tabel atau tabel pivot dalam sel di Excel?
Artikel ini berbicara tentang menampilkan tabel tertentu atau nama tabel pivot dalam sel di Excel.
Tampilkan nama tabel atau tabel pivot dalam sel dengan kode VBA
Tampilkan nama tabel atau tabel pivot dalam sel dengan kode VBA
Kode VBA berikut dapat membantu Anda menampilkan tabel tertentu atau nama tabel pivot dalam sel. Silakan lakukan sebagai berikut.
1. tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul. Kemudian salin kode VBA di bawah ini ke jendela Modul.
Kode VBA: Menampilkan nama tabel atau tabel pivot dalam sel
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. tekan lain + Q kunci untuk keluar dari Microsoft Visual Basic untuk Aplikasi jendela.
4. Pilih sel kosong, masukkan rumus =getObjName(A2) ke dalam Formula Bar dan kemudian tekan tombol Enter. Lihat tangkapan layar:
Catatan:
Artikel terkait:
- Bagaimana cara mencantumkan semua nama tabel di Excel?
- Bagaimana cara agar tabel dapat diperluas dengan memasukkan baris tabel di lembar kerja terlindungi di Excel?
- Bagaimana cara menyusun ulang posisi kolom dalam tabel di Excel?
- Bagaimana cara menyembunyikan baris nilai nol di tabel pivot?
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!