Bagaimana cara mengekstrak nilai unik dari beberapa kolom di Excel?
Misalkan Anda memiliki beberapa kolom dengan beberapa nilai, beberapa nilai diulangi dalam kolom yang sama atau kolom berbeda. Dan sekarang Anda ingin menemukan nilai yang ada di salah satu kolom hanya sekali. Apakah ada trik cepat bagi Anda untuk mengekstrak nilai unik dari beberapa kolom di Excel?
Ekstrak nilai unik dari beberapa kolom dengan rumus
Bagian ini akan membahas dua rumus: satu menggunakan rumus array yang cocok untuk semua versi Excel, dan satu lagi menggunakan rumus array dinamis khusus untuk Excel 365.
Ekstrak nilai unik dari beberapa kolom dengan rumus Array untuk semua versi Excel
Untuk pengguna dengan versi Excel apa pun, rumus array bisa menjadi alat yang ampuh untuk mengekstraksi nilai unik di beberapa kolom. Inilah cara Anda melakukannya:
1. Dengan asumsi nilai-nilai Anda dalam jangkauan A2: C9, masukkan rumus berikut ke sel E2:
=INDIRECT(TEXT(MIN(IF(($A$2:$C$9<>"")*(COUNTIF($E$1:E1,$A$2:$C$9)=0),ROW($2:$9)*100+COLUMN($A:$C),7^8)),"R0C00"),)&""
2. Lalu tekan Shift + Ctrl + Masuk bersama-sama, lalu seret gagang isian untuk mengekstrak nilai unik hingga sel kosong muncul. Lihat tangkapan layar:
- $ A $ 2: $ C $ 9: Ini menentukan rentang data yang akan diperiksa, yaitu sel dari A2 hingga C9.
- IF(($A$2:$C$9<>"")*(COUNTIF($E$1:E1,$A$2:$C$9)=0), ROW($2:$9)*100+COLUMN($A:$C), 7^8):
- $A$2:$C$9<>"" memeriksa apakah sel dalam rentang tersebut tidak kosong.
- COUNTIF($E$1:E1,$A$2:$C$9)=0 menentukan apakah nilai sel ini belum tercantum dalam rentang sel dari E1 hingga E1.
- Jika kedua kondisi terpenuhi (yaitu, nilainya tidak kosong dan belum tercantum di kolom E), fungsi IF menghitung angka unik berdasarkan baris dan kolomnya (ROW($2:$9)*100+COLUMN($A: $C)).
- Jika kondisi tidak terpenuhi, fungsi akan mengembalikan sejumlah besar (7^8), yang berfungsi sebagai pengganti.
- menit(...): Menemukan angka terkecil yang dikembalikan oleh fungsi IF di atas, sesuai dengan lokasi nilai unik berikutnya.
- TEKS(...,"R0C00"): Mengonversi angka minimum ini menjadi alamat gaya R1C1. Kode format R0C00 menunjukkan konversi angka ke dalam format referensi sel Excel.
- TIDAK LANGSUNG(...): Menggunakan fungsi INDIRECT untuk mengonversi alamat gaya R1C1 yang dihasilkan pada langkah sebelumnya kembali ke referensi sel gaya A1 normal. Fungsi INDIRECT memungkinkan referensi sel berdasarkan konten string teks.
- &"": Menambahkan &"" di akhir rumus memastikan hasil akhir diperlakukan sebagai teks, sehingga angka genap akan ditampilkan sebagai teks.
Ekstrak nilai unik dari beberapa kolom dengan rumus untuk Excel 365
Excel 365 mendukung array dinamis, sehingga lebih mudah mengekstrak nilai unik dari beberapa kolom:
Silakan masukkan atau salin rumus berikut ke sel kosong tempat Anda ingin meletakkan hasilnya, lalu klik Enter kunci untuk mendapatkan semua nilai unik sekaligus. Lihat tangkapan layar:
=UNIQUE(TOCOL(A2:C9,1))
Ekstrak nilai unik dari beberapa kolom dengan Kutools AI Aide
Melepaskan kekuasaan Kutools AI Ajudan untuk mengekstrak nilai unik dengan lancar dari beberapa kolom di Excel. Hanya dengan beberapa klik, alat cerdas ini menyaring data Anda, mengidentifikasi dan membuat daftar entri unik di rentang mana pun yang dipilih. Lupakan kerumitan rumus rumit atau kode vba; Rangkullah efisiensi Kutools AI Ajudan dan ubah alur kerja Excel Anda menjadi pengalaman yang lebih produktif dan bebas kesalahan.
Setelah menginstal Kutools for Excel, silakan klik Kutools AI > Ajudan AI untuk membuka Kutools AI Ajudan panel:
- Ketik kebutuhan Anda ke dalam kotak obrolan, dan klik Kirim tombol atau tekan Enter kunci untuk mengirimkan pertanyaan;
"Ekstrak nilai unik dari rentang A2:C9, abaikan sel kosong, dan tempatkan hasilnya mulai dari E2:" - Setelah menganalisis, klik Eksekusi tombol untuk menjalankan. Kutools AI Aide akan memproses permintaan Anda menggunakan AI dan mengembalikan hasilnya di sel yang ditentukan langsung di Excel.
Ekstrak nilai unik dari beberapa kolom dengan Tabel Pivot
Jika Anda terbiasa dengan tabel pivot, Anda dapat dengan mudah mengekstrak nilai unik dari beberapa kolom dengan langkah-langkah berikut:
1. Pertama-tama silahkan masukkan satu kolom kosong baru di sebelah kiri data anda, pada contoh ini saya akan memasukkan kolom A disamping data asli.
2. Klik satu sel di data Anda, dan tekan Alt + D tombol, lalu tekan P kunci segera untuk membuka Panduan PivotTable dan PivotChart, pilih Beberapa rentang konsolidasi di wizard langkah1, lihat tangkapan layar:
3. Lalu klik Selanjutnya tombol, periksa Buat satu bidang halaman untuk saya opsi di wizard step2, lihat tangkapan layar:
4. Lanjutkan mengklik Selanjutnya tombol, klik untuk memilih rentang data yang termasuk kolom kiri baru sel, lalu klik Add tombol untuk menambahkan rentang data ke Semua rentang kotak daftar, lihat tangkapan layar:
5. Setelah memilih rentang data, lanjutkan klik Selanjutnya, di panduan langkah 3, pilih tempat Anda ingin meletakkan laporan PivotTable sesuka Anda.
6. Terakhir, klik Finish untuk menyelesaikan wizard, dan tabel pivot telah dibuat di lembar kerja saat ini, kemudian hapus centang semua bidang dari Pilih bidang untuk ditambahkan ke laporan bagian, lihat tangkapan layar:
7. Kemudian periksa bidangnya Nilai atau seret Nilai ke Baris label, sekarang Anda akan mendapatkan nilai unik dari beberapa kolom sebagai berikut:
Ekstrak nilai unik dari beberapa kolom dengan kode VBA
Dengan kode VBA berikut, Anda juga dapat mengekstrak nilai unik dari beberapa kolom.
1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.
VBA: Ekstrak nilai unik dari beberapa kolom
Sub Uniquedata()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Set dt = CreateObject("Scripting.Dictionary")
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For Each rng In InputRng
If rng.Value <> "" Then
dt(rng.Value) = ""
End If
Next
OutRng.Range("A1").Resize(dt.Count) = Application.WorksheetFunction.Transpose(dt.Keys)
End Sub
3. Lalu tekan F5 untuk menjalankan kode ini, dan kotak prompt akan muncul untuk mengingatkan Anda memilih rentang data yang ingin Anda gunakan. Lihat tangkapan layar:
4. Dan kemudian klik OK, kotak prompt lain akan muncul untuk membiarkan Anda memilih tempat untuk meletakkan hasilnya, lihat tangkapan layar:
5. Klik OK untuk menutup dialog ini, dan semua nilai unik telah diekstraksi sekaligus.
Artikel yang lebih relatif:
- Hitung Jumlah Nilai Unik Dan Berbeda Dari Sebuah Daftar
- Misalkan, Anda memiliki daftar panjang nilai dengan beberapa item duplikat, sekarang, Anda ingin menghitung jumlah nilai unik (nilai yang muncul dalam daftar hanya sekali) atau nilai yang berbeda (semua nilai berbeda dalam daftar, artinya unik nilai + nilai duplikat pertama) di kolom seperti gambar kiri yang ditampilkan. Artikel ini, saya akan berbicara tentang cara menangani pekerjaan ini di Excel.
- Ekstrak Nilai Unik Berdasarkan Kriteria Di Excel
- Misalkan, Anda memiliki rentang data berikut yang ingin Anda daftar hanya nama unik kolom B berdasarkan kriteria tertentu dari kolom A untuk mendapatkan hasil seperti gambar di bawah ini. Bagaimana Anda bisa menangani tugas ini di Excel dengan cepat dan mudah?
- Hanya Izinkan Nilai Unik Di Excel
- Jika Anda hanya ingin menyimpan nilai unik yang dimasukkan ke dalam kolom lembar kerja dan mencegah duplikat, artikel ini akan memperkenalkan beberapa trik cepat bagi Anda untuk menangani tugas ini.
- Jumlahkan Nilai Unik Berdasarkan Kriteria Di Excel
- Misalnya, saya memiliki berbagai data yang berisi kolom Nama dan Urutan, sekarang, untuk menjumlahkan hanya nilai unik di kolom Urutan berdasarkan kolom Nama seperti gambar berikut yang ditampilkan. Bagaimana mengatasi tugas ini dengan cepat dan mudah di Excel?
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!