VBA - EXCEL - Filter Otomatis dan Metode Rentang Objek

Seseorang mungkin memerlukan beberapa jenis filter dalam lembar Excel untuk membantu pemrograman VBA. Lembar Excel digunakan untuk menyederhanakan perhitungan yang membosankan dan filter pengaturan penting dalam proses. Ini akan membantu dalam menetapkan rentang di Excel dengan menggunakan program sederhana di VBA. Permintaan utama yang dimiliki orang adalah cara mengambil objek dalam format rentang objek. Artikel di bawah ini adalah pelajaran pemrograman VBA kecil tentang memilih filter otomatis dan rentang objek di bidang sel tertentu dalam lembar Excel. Mulailah dengan memulai makro dan akhiri program sub VBA. Sel-sel harus aktif dan tidak disembunyikan oleh filter.

Isu

Dengan pemrograman VBA, dimungkinkan untuk mengatur filter pada selembar:

•  Bidang PemilihanFilter Seleksi: Auto: 1, Kriteria 1: = "FOO" 

• Filter menampilkan sejumlah garis berdasarkan kriteria yang ditentukan.
• Bagaimana cara mengambil baris ini dalam objek Range?

Larutan

Ini seharusnya menjawab masalah Anda:

 Sub Macro2 () Sun rngSelect As Range 'Saya mengasumsikan bahwa filter berada pada jalur 1 Range ("A1"). Pilih Seleksi 'Filtering'. Bidang AutoFilter: = 1, Kriteria1: = "Seleksi FOO". Bidang AutoFilter: = 7 Kriteria1: = "* paris *" 'RngPilih = semua sel yang terlihat (tidak disembunyikan oleh filter)' Bersebelahan dengan set sel aktif rngSelect = ActiveCell.CurrentRegion.SpecialCells (xlCellTypeVisible) 'Salin area yang dipilih rngSelect.Copy Debug.Print rngSelect.Address' ... 'Perintah' Banyak dan beragam '... Set rngSelect = Nothing End Sub