Code:
let
Source = Excel.Workbook(File.Contents("C:\remove_blank\before_sort.xlsx"), null, true),
#"BUKU REGISTER_Sheet" = Source{[Item="BUKU REGISTER",Kind="Sheet"]}[Data],
Promote = Table.PromoteHeaders(#"BUKU REGISTER_Sheet", [PromoteAllScalars=true]),
UOC = Table.UnpivotOtherColumns(Promote, {"REF BPHTB", "REF Verif", "Name of city", "NOMOR REGISTER LELANG", "TANGGAL REGISTER LELANG", "NO. TIKET PERMOHONAN ONLINE", "NAMA PEMOHON LELANG/PENJUAL", "NAMA DAN JABATAN YANG MENANDATANGANI SURAT PERMOHONAN LELANG", "KATEGORI PEMOHON LELANG/PENJUAL", "NOMOR SURAT PERMOHONAN LELANG", "TANGGAL SURAT PERMOHONAN LELANG", "NAMA DEBITUR", "BEA PERMOHONAN LELANG", "TANGGAL SETOR BEA PERMOHONAN KE KAS NEGARA", "NOMOR NTPN BEA PERMOHONAN", "NOMOR HASIL PENELITIAN KELENGKAPAN BERKAS", "TANGGAL HASIL PENELITIAN KELENGKAPAN BERKAS", "NOMOR SURAT KELENGKAPAN BERKAS", "TANGGAL SURAT KELENGKAPAN BERKAS LELANG", "NOMOR SURAT JAWABAN KELENGKAPAN BERKAS", "TANGGAL SURAT JAWABAN KELENGKAPAN BERKAS", "NOMOR SURAT PENETAPAN JADWAL LELANG", "TANGGAL SURAT PENETAPAN JADWAL LELANG", "TEMPAT PELAKSANAAN LELANG", "NOMOR RISALAH LELANG", "NOMOR URUT LOT BARANG", "KODE LOT LELANG", "TANGGAL RISALAH LELANG", "STATUS LELANG", "NAMA PEJABAT LELANG/PELELANG", "NIP PEJABAT LELANG", "NOMOR DAN TANGGAL SK PENGANGKATAN PEJABAT LELANG", "NOMOR DAN TANGGAL ST PEJABAT LELANG", "NAMA PEJABAT PENJUAL", "NOMOR DAN TANGGAL SURAT PENUNJUKAN PEJABAT PENJUAL", "JENIS LELANG", "SUB JENIS LELANG", "JENIS PENAWARAN", "JENIS TRANSAKSI", "URAIAN BARANG", "KATEGORI BARANG", "UMKM", "NOP/NJOP", "SIFAT BARANG", "JUMLAH PESERTA LELANG", "JAMINAN PENAWARAN LELANG", "NILAI LIMIT", "NOMOR REGISTER PEMBATALAN LELANG", "ALASAN PEMBATALAN LELANG", "SURAT PERMINTAAN BEA LELANG BATAL", "NAMA PEMENANG LELANG/PEMBELI", "ALAMAT PEMBELI", "NOMOR IDENTITAS PEMBELI", "NPWP PEMENANG LELANG/PEMBELI", "TANGGAL PEMBAYARAN OLEH PEMBELI", "POKOK LELANG", "HASIL BERSIH LELANG", "TANGGAL PENYETORAN HASIL BERSIH LELANG", "BEA LELANG PENJUAL", "BEA LELANG PEMBELI", "BEA LELANG BATAL", "PPH", "PPN", "PENERIMAAN NEGARA LAINNYA", "TANGGAL PENYETORAN KE KAS NEGARA", "NOMOR NTPN BEA LELANG", "BPHTB", "TANGGAL SURAT SETOR BPHTB", "TANGGAL PENYELESAIAN MINUTA RL", "NOMOR DAN TANGGAL BERITA ACARA PEMBETULAN MINUTA/RL", "TANGGAL PENYERAHAN KUTIPAN RL", "NOMOR PERKARA GUGATAN KE PENGADILAN", "KETERANGAN"}, "Attribute", "Value"),
Filter = Table.SelectRows(UOC, each ([Name of city] = "KPKNL Padang")),
PC = Table.Pivot(Filter, List.Distinct(Filter[Attribute]), "Attribute", "Value")
in
PC
btw. PQ doesn't support excel formulas or Data Validation list
Bookmarks