Cara Menampilkan Kolom Tertentu dari Suatu File Ms. Excel Hanya Dengan Satu Kali Klick

Ms. Excel merupakan suatu aplikasi yang paling digemari untuk melakukan suatu pengolahan dan penyajian data. Dalam Ms. Excel berbagai macam bentuk cara penyajian data pun bisal dilakukan misalkan seperti penyajian data dalam bentuk tabel, chart, dan lain sebagainya.

Ms. Excel pun memiliki berbagai macam kehebatan untuk mempercepat pengolahan data, salah satunya adalah Ms. Excel bisa menyajikan suatu data dalam format tertentu sesuai dengan keinginan anda dari suatu file tertentu hanya dengan cara satu kali klick saja.

Kali ini web Matematika Akuntansi akan memberikan cara menampilkan kolom tertentu dari suatu file Ms. Excel hanya dengan satu kali klick saja.

Tentunya untuk dapat melakukan hal di atas pasti ada suatu peran object tertentu yang dapat membantu melakukan hal tersebut yaitu adalah peranan dari VBA Macro. Dengan VBA Macro anda bisa membuat atau menampilkan kolom tertentu sesuai dengan keinginan anda hanya dengan satu kali klick saja. Berikut adalah cara menampilkan kolom tertentu dari suatu file Ms. Excel hanya dengan satu kali klick.

1. Tentukan data yang akan menjadi dasar

Penentuan data yang akan menjadi dasar di sini adalah biasanya suatu data tarikan dari suatu aplikasi tertentu, misalnya tarikan suatu data pengiriman dari aplikasi DMS dalam periode tertentu, misalnya yang menjadi dasar data adalah seperti contoh gambar berikut ini :

2. Buat format yang diinginkan dalam Ms. Excel

Buatlah format yang kalian inginkan dalam Ms. Excel. Misalkan kalian akan menampilkan kolom-kolom berikut ini :

• konid
• tanggal
• penerima
• nmproduk
• nmkota
• tarif

Nama Sheet harus sama dengan gambar yang kami contohkan karena penamaan sheet akan berpengaruh pada saat pembuatan macro VBA Excel. Selain nama Sheet kalian juga harus menamai cell yang akan menjadi hasilnya dan cell yang akan menjadi filternya.

Cell hasil adalah cell yang menjadi header dari format laporan.

Untuk cell yang diberi nama Filter simpan di sheet 3 seperti gambar di bawah ini :

3. Buat Coding Macro.

Berikut adalah coding macro yang digunakan, :

Sub Format_Laporan()

Dim wb As Workbook

Dim sh As Worksheet

Dim dsh As Worksheet

Set dsh = ThisWorkbook.Sheets("Sheet2")

dsh.UsedRange.Clear

Dim File_Name As Variant

File_Name = Application.GetOpenFilename("Excel Files (*.xlsx),*.xlsx, Text Files (*.txt),*.txt", 1, "Select Excel Files to Consolidate", , True)

Dim i As Integer

Dim lr As Long

For i = LBound(File_Name) To UBound(File_Name)

lr = dsh.Range("A" & Application.Rows.Count).End(xlUp).Row

Set wb = Workbooks.Open(File_Name(i))

Set sh = wb.Sheets(1)

sh.UsedRange.Copy dsh.Range("A" & lr + 1)

wb.Close False

Next i

dsh.Range("1:1").Delete

dsh.UsedRange.AutoFilter 1, dsh.Range("A1").Value

dsh.Range("A2:A" & Application.Rows.Count).SpecialCells(xlCellTypeVisible).EntireRow.Delete

dsh.AutoFilterMode = False

Sheets("Sheet2").UsedRange.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range("Filter"), CopyToRange:=Range("Hasil"), Unique:=False

Application.DisplayAlerts = False

Sheets("Sheet2").Delete

Sheets("Sheet3").Delete

Sheets("Sheet1").Range("A2").CurrentRegion.Borders.LineStyle = xlContinuous

Sheets("Sheet1").Columns("A:XFD").AutoFit

End Sub

4. Masukan Coding ke dalam module VBA Excel.

Untuk menjalankan coding yang telah dibuat maka coding harus dimasukan ke dala module VBA Excel, dengan cara sebagai berikut :

Buka aplikasi Ms. Excel →  Developer → View Code

Setelah jendela VBA terbuka maka pilih menu → Insert → Module

Setelah jendela module VBA muncul maka masukan Coding di atas ke dalam jendela module VBA

5. Jalankan coding VBA Macro

Untuk menjalankan coding VBA yang telah disimpan di dalam module VBA, maka harus dibuat suatu gambar tombol untuk menjalankan macro. Misalkan seperti gambar di bawah ini :

Kemudian klick kanan pada tombol → Assign Macro → Pilih nama Macro yang telah dibuat di jendela Assign Macro → Klick Ok di jendela Assign Macro.

Maka untuk menjalankan coding macro kalian tinggal klick gambar tombol kemudian pilih file yang menjadi dasar yang telah kalian buat pada point 1.

Maka hasilnya menjadi :

Maka setalah melakukan 5 langkah atau cara di atas kalian bisa membuat atau menampilkan kolom tertentu dari suatu file Ms. Excel hanya dengan satu kali klick.

Demikian artikel kali ini.

Mohon maaf apabila ada salah-salah kata.
Apabila ada yang ingin ditanyakan atau disampaikan, silahkan untuk menulis pada kolom komentar di bawah.

Referensi :

• Google.com

Salam,

Muhamad Pajar Sidik

President Director of (matematikaakuntansi.blogspot.com)
Email : fajarmoehamad@gmail.com
IG : @mupasid

BEANBAG TRIANGLE SIZE LARGE TERMASUK ISI , SIAP PAKAI😊

Jika ingin bertanya secara privat, Silahkan hubungi no 085709994443 dan untuk berkomentar silahkan klick link di bawah ini 👇