Secara umum, The TRANSPOSE mungkin sering digunakan untuk mengkonversi baris ke kolom. Namun, hasil yang bergantung pada kriteria tertentu, seperti nilai unik, tidak akan dikembalikan. Dalam tutorial ini, kami akan menunjukkan kepada Anda cara untuk mengubah urutan baris ke kolom berdasarkan kriteria di Excel.

Unduh Buku Kerja Praktik

Unduh buku kerja latihan ini untuk latihan saat Anda membaca artikel ini.

2 Pendekatan Praktis untuk Mengubah Urutan Baris ke Kolom Berdasarkan Kriteria di Excel

Kami telah menyertakan satu set data dari beberapa produk dan jumlahnya pada gambar di bawah ini. baris kemudian akan ditransposisikan ke dalam kolom. Kami akan mengubah urutan baris menjadi kolom berdasarkan kriteria dari nilai unik karena ada beberapa entri duplikat dalam sel terpisah. Pertama, kita akan menggunakan INDEX , PERTANDINGAN , COUNTIF , JIKA dan IFERROR untuk membuat formula. Kita juga akan menjalankan fungsi VBA kode untuk mencapai hal yang sama.

1. Terapkan Rumus dengan Fungsi INDEX, MATCH, dan COUNTIF untuk Mengubah Urutan Baris ke Kolom Berdasarkan Kriteria di Excel

Pada awalnya, kita akan menerapkan rumus-rumus dari INDEX , PERTANDINGAN , COUNTIF , JIKA dan IFERROR fungsi-fungsi dengan larik.

Langkah 1: Masukkan Fungsi INDEX, MATCH, dan COUNTIF

• Di dalam sel E5 , ketikkan rumus berikut untuk mendapatkan produk unik.

Langkah 2: Terapkan Array

• Untuk menerapkan rumus dengan array, tekan Ctrl + Pergeseran + Masuk

• Oleh karena itu, Anda akan mendapatkan hasil unik pertama.

Langkah 3: Sel Isi-Otomatis

• Untuk mendapatkan semua nilai unik, gunakan IsiOtomatis Tangani Alat untuk mengisi kolom secara otomatis.

Langkah 4: Masukkan Fungsi IFERROR

• Untuk mengubah nilai baris kuantitas menjadi kolom, tulis rumus berikut.

Langkah 5: Terapkan Array

• Untuk Menyisipkan larik, tekan Ctrl + Pergeseran + Masuk .

• Sebagai konsekuensinya, sel F5 akan menunjukkan nilai transposisi pertama seperti pada gambar yang ditunjukkan di bawah ini.

• Seret ke bawah dengan Alat Pegangan IsiOtomatis untuk mengisi kolom secara otomatis.

• Terakhir, mengisi baris secara otomatis dengan Alat Pegangan IsiOtomatis .
• Oleh karena itu, semua baris yang ditransposisi akan berubah menjadi kolom seperti pada gambar yang ditunjukkan di bawah ini.

Baca Lebih Lanjut: Ubah Urutan Beberapa Baris dalam Grup ke Kolom di Excel

Bacaan Serupa

• Cara Mengubah Urutan Baris Duplikat ke Kolom di Excel (4 Cara)
• Excel VBA: Ubah Urutan Beberapa Baris dalam Grup ke Kolom
• Ubah urutan Beberapa Kolom menjadi Satu Kolom di Excel (3 Metode Praktis)
• Cara Membalikkan Transpose di Excel (3 Metode Sederhana)

2. Jalankan Kode VBA untuk Mengubah Urutan Baris ke Kolom Berdasarkan Kriteria di Excel

Langkah 1: Buat Modul

• Pertama, tekan Alt + F11 untuk memulai Makro VBA .
• Klik pada Sisipkan .
• Untuk membuat Modul , pilih Modul pilihan.

Langkah 2: Ketik Kode VBA

• Tempelkan yang berikut ini VBA

 Sub TransposeRows() 'Define Variables Dim RowsNumber As Long Dim p As Long Dim xColCr As String Dim xColumn As New Collection Dim InputRng As Range Dim OutputRng As Range Dim RngText As String Dim CountRow As Long Dim xRowRg As Range On Error Resume Next 'Set values and Input Box fot Input Range RngText = ActiveWindow.RangeSelection.Address Set InputRng = Application.InputBox("Select Your InputRange for 2 columns:", "ExcelWIKI", RngText, , , , , 8) Set InputRng = Application.Intersect(InputRng, InputRng.Worksheet.UsedRange) 'Terapkan Kondisi untuk menghitung hanya 2 kolom dan untuk menampilkan kotak msg untuk mengingatkan untuk memilih hanya dua kolom If InputRng Is Nothing Then Exit Sub If (InputRng.Columns.Count 2) Or _ (InputRng.Areas.Count> 1) Then MsgBox "Rentang yang ditentukan hanya area untuk 2 kolom ",, "ExcelWIKI" Exit Sub End If 'Atur nilai dan Input Box fot Input Range Set OutputRng = Application.InputBox("Select Your Output Range (one cell):", "ExcelWIKI", RngText, , , , , , 8) If OutputRng Is Nothing Then Exit Sub Set OutputRng = OutputRng.Range(1) 'Hitung Baris RowsNumber = InputRng.Rows.Count 'Terapkan For loop For p = 2 To RowsNumber xColumn.Add InputRng.Cells(p, 1).Value, InputRng.Cells(p,1).Value Next Application.ScreenUpdating = False For p = 1 To xColumn.Count xColCr = xColumn.Item(p) OutputRng.Offset(p, 0) = xColCr InputRng.AutoFilter Field:=1, Criteria1:=xColCr Set xRowRg = InputRng.Range("B2:B" & RowsNumber).SpecialCells(xlCellTypeVisible) If xRowRg.Count> CountRow Then CountRow = xRowRg.Count 'Copy dan paste dengan transpose InputRng.Range("B2:B" &RowsNumber).SpecialCells(xlCellTypeVisible).Copy OutputRng.Offset(p, 1).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True Application.CutCopyMode = False Next OutputRng = InputRng.Cells(1, 1) OutputRng.Offset(0, 1).Resize(1, CountRow) = InputRng.Cells(1, 2) InputRng.Rows(1).Copy OutputRng.Resize(1, CountRow + 1).PasteSpecial Paste:=xlPasteFormatsInputRng.AutoFilter Application.ScreenUpdating = True End Sub 

Langkah 3: Jalankan Program

• Pertama, Simpan dan tekan F5 untuk menjalankan program.
• Pilih kumpulan data Anda dengan header.
• Klik pada OK .

• Pilih sel untuk mendapatkan keluaran
• Kemudian, klik pada OK .

• Hasilnya, Anda akan mendapatkan hasil yang berupa baris yang ditransposisikan ke dalam kolom, seperti yang ditunjukkan pada gambar di bawah ini.

Baca Lebih Lanjut: Cara Mengubah Urutan Baris ke Kolom Menggunakan Excel VBA (4 Contoh Ideal)

Kesimpulan

Saya harap artikel ini telah memberi Anda tutorial tentang cara mengubah urutan baris ke kolom berdasarkan kriteria di Excel Semua prosedur ini harus dipelajari dan diterapkan pada dataset Anda. Lihatlah buku kerja latihan dan uji keterampilan ini. Kami termotivasi untuk terus membuat tutorial seperti ini karena dukungan Anda yang berharga.

Jika Anda memiliki pertanyaan - Jangan ragu untuk bertanya kepada kami. Juga, jangan ragu untuk meninggalkan komentar di bagian di bawah ini.

Kami, para Exceldemy Tim, selalu responsif terhadap pertanyaan Anda.

Tetaplah bersama kami, teruslah belajar.