Makro Excel ini memfilter pilihan data untuk menampilkan hanya 10 item terbawah dalam daftar atau kumpulan data. Ini menggunakan metode autofilter di Excel
Untuk menggunakan makro ini, cukup pastikan bahwa referensi sel untuk rentang tersebut adalah awal dari tabel, daftar, atau kumpulan data yang ingin Anda filter. Ini adalah makro filter yang sangat mudah digunakan di Excel dan dapat membantu merampingkan kebutuhan pemrosesan data Anda di Excel
Dalam artikel ini, kami akan mengilustrasikan cara memasukkan data ke dalam tabel Excel menggunakan kode VBA. Dengan bantuan properti dan metode bawaan Excel, kami dapat memfasilitasi fungsionalitas menambahkan atau menimpa data ke dalam tabel dengan mudah. Mari selami contoh untuk mendapatkan pemahaman yang jelas tentang metode bersama dengan kode VBA
Daftar isi
Download Buku Latihan
Unduh buku latihan latihan ini untuk berolahraga saat Anda membaca artikel ini
Masukkan Data ke dalam Tabel. xlsm
4 Contoh Memasukkan Data ke Tabel Menggunakan VBA di Excel
Katakanlah, kita memiliki daftar penjualan toko dengan detail seperti tanggal pemesanan, nama produk, jumlah, harga satuan, dan harga total.
Cara Membuat Tabel di Excel
Untuk mengubah kumpulan data menjadi tabel Excel, lakukan hal berikut-
- Pilih seluruh kumpulan data
- Buka tab Sisipkan dari Pita Excel
- Klik pada opsi Tabel
- Terakhir, klik tombol OK di jendela Create Table
- Kami telah berhasil mengonversi kumpulan data menjadi tabel Excel
Untuk memasukkan data ke dalam tabel Excel, kami akan menggunakan beberapa fungsi dan properti VBA dalam kode kami. Bagian berikut menjelaskan cara membuka dan menulis kode di editor visual basic
Menulis Kode di Editor Visual Basic
Ikuti langkah-langkah untuk membuka editor visual basic dan menulis beberapa kode di sana.
- Buka tab Pengembang dari Pita Excel
- Klik opsi Visual Basic
- Di jendela Visual Basic for Applications, klik dropdown Sisipkan untuk memilih Modul Baru
Sekarang modul baru dibuka, tulis beberapa kode di sana dan tekan F5 untuk menjalankan
1. Sisipkan Data di Baris Terakhir Tabel Menggunakan VBA di Excel
Dalam contoh ini, kami akan menggunakan kode VBA untuk menambahkan baris baru di bagian bawah tabel, lalu memasukkan data ke dalamnya. Di tabel kami, kami memiliki 4 baris data. Untuk menambahkan yang ke-5, salin dan tempel kode berikut ke editor visual basic
Sub InsertDataIntoTable() Dim tableName As ListObject Set tableName = ActiveSheet.ListObjects("Table1") Dim addedRow As ListRow Set addedRow = tableName.ListRows.Add() With addedRow .Range(1) = "1/1/2022" .Range(2) = "Apple" .Range(3) = 5 .Range(4) = 1.77 End With End SubTekan F5 untuk menjalankan kode
Kami telah memasukkan baris data baru di bagian bawah tabel yang ada
Penjelasan Kode
- Dalam kode kami, kami menggunakan objek ListObjects dari VBA Excel untuk mengambil tabel dengan namanya. Untuk informasi lebih lanjut, masing-masing objek ListObject adalah tabel di lembar kerja. Untuk mendapatkan nama tabel, klik tabel >> klik tab Desain Tabel di Pita Excel
- Kemudian, kami menggunakan ListRows. Tambahkan metode untuk menambahkan baris baru di tabel. Metode ini membutuhkan dua argumen. Posisikan dan Selalu Sisipkan
Dengan memasukkan bilangan bulat, kita dapat menentukan posisi relatif dari baris yang baru ditambahkan dalam tabel. Dalam contoh ini, kami mengosongkan argumen posisi, sebagai hasilnya, baris baru telah ditambahkan di bagian bawah tabel
- Terakhir, kami menetapkan data di setiap sel dari baris yang baru ditambahkan. Dalam hal ini, datanya adalah. Range(1) = “1/1/2022” sebagai TanggalPesanan,. Range(2) = “Apple” sebagai Produk,. Range(3) = 5 sebagai Kuantitas,. Rentang(4) = 1. 77 sebagai Harga Satuan
Baca Selengkapnya. Nama Tabel Excel. Yang Perlu Anda Ketahui
2. Jalankan Kode VBA untuk Memasukkan Data pada Baris Tertentu dari Tabel di Excel
Dalam ilustrasi ini, kita akan menambahkan baris data pada baris tertentu relatif terhadap tabel menggunakan potongan kode yang sama yang kita gunakan pada contoh di atas. Dalam hal ini, kita hanya perlu menentukan argumen Posisi ListRows. Tambahkan metode dalam kode kita. Katakanlah kita ingin menambahkan data penjualan Orange dengan detail pada baris nomor 3 relatif terhadap tabel yang ada. Agar ini terjadi, salin dan tempel kode berikut ke dalam editor kode visual
Sub InsertDataIntoTable() Dim tableName As ListObject Set tableName = ActiveSheet.ListObjects("Table1") Dim addedRow As ListRow Set addedRow = tableName.ListRows.Add(3) With addedRow .Range(1) = "1/1/2022" .Range(2) = "Orange" .Range(3) = 3 .Range(4) = 2.14 End With End Sub_Menjalankan kode dengan menekan F5 memasukkan data penjualan Orange di baris ke-3 relatif terhadap tabel
Baca Selengkapnya. Kode VBA Excel untuk Setiap Baris dalam Tabel (Tambah, Timpa, Hapus, dll. )
Bacaan Serupa
- Jumlah Bidang Terhitung Dibagi dengan Hitungan dalam Tabel Pivot
- Bagaimana Menggambarkan Distribusi Frekuensi Relatif di Excel
- [Perbaikan] Tidak Dapat Mengelompokkan Tanggal di Tabel Pivot. 4 Kemungkinan Solusi
- Cara Menghitung Distribusi Frekuensi Persen di Excel (2 Metode)
- Tabel Pivot Tidak Menyegarkan (5 Masalah & Solusi)
3. Sisipkan dan Timpa Data ke dalam Tabel Menggunakan VBA di Excel
Di sini kami akan mengilustrasikan cara menimpa data yang ada di tabel alih-alih menyisipkan baris data baru. Untuk melakukan itu, kita perlu menggunakan ListObject. properti ListRows Excel, bukan ListRows. Tambahkan properti yang kita gunakan sebelumnya. ListObject. Properti ListRows juga menggunakan nomor baris (nilai bilangan bulat) sebagai argumennya. Misalkan, kita ingin mengubah harga satuan Jeruk dari 2. 14 sampai 2. 35 yang kami sisipkan pada contoh sebelumnya. Salin dan tempel kode berikut di bawah ini di editor visual basic
Sub InsertDataIntoTable() Dim tableName As ListObject Set tableName = ActiveSheet.ListObjects("Table1") Dim addedRow As ListRow Set addedRow = tableName.ListRows(3) With addedRow .Range(1) = "1/1/2022" .Range(2) = "Orange" .Range(3) = 3 .Range(4) = 2.35 End With End SubDalam kode kami, kami menetapkan argumen untuk ListObject. Properti ListRows sebagai 3 tempat data untuk Orange berada. Jalankan kodenya dengan menekan F5 dan lihat perbedaannya
Kode hanya mengubah harga satuan data pada baris nomor 3 relatif terhadap tabel
Baca Selengkapnya. Cara Menyisipkan atau Menghapus Baris dan Kolom dari Tabel Excel
4. Jalankan Kode VBA untuk Memasukkan Data ke dalam Tabel Excel Berdasarkan Input Pengguna
Dalam contoh ini, kami akan menyisipkan nama tabel dan detail penjualan suatu produk sebagai input pengguna daripada meng-hardcode-nya dalam kode VBA setiap kali. Ikuti petunjuk di bawah ini untuk melakukannya
- Salin dan tempel kode berikut ke editor kode visual
- Tekan F5 untuk menjalankan kode
- Letakkan nama tabel di kotak input (Tabel1, dalam contoh ini) dan tekan OK
- Kemudian isikan nilai Order Date, Product Name, Quantity, dan Unit Price pada kotak input yang muncul berurutan. Dalam contoh ini, nilai yang kami gunakan adalah 1/1/2022, Oranye, 3, dan 35
- Hasilnya, kami mendapatkan baris baru dengan data yang disisipkan di bagian bawah tabel
Baca Selengkapnya. Tips Pemformatan Tabel Excel – Mengubah Tampilan Tabel
Catatan
Saat kami menambahkan baris baru dengan data menggunakan kode VBA, format, dan rumus dibawa ke baris baru secara otomatis. Dalam contoh kita, kolom TotalHarga menghasilkan produk dari kolom Kuantitas, dan Harga Satuan. Kami hanya memasukkan nilai Kuantitas dan Harga Satuan;
Kesimpulan
Sekarang, kita tahu cara memasukkan data ke dalam tabel Excel menggunakan kode VBA. Mudah-mudahan, ini akan membantu Anda menggunakan metode ini dengan lebih percaya diri. Setiap pertanyaan atau saran jangan lupa untuk memasukkannya ke dalam kotak komentar di bawah ini