Kuldeep perlu memilih setiap sel ketiga melalui jarak 1500 sel. memberikan penyelesaian gila.
Tonton Video
- Kuldeep ingin memilih setiap sel ketiga untuk 1500 sel
- Kod makro untuk menyatukan semua 500 sel terlalu panjang dan menyebabkan ralat kompilasi!
- Penyelesaian: Bina 1, kosong, kosong. Salin ketiga sel tersebut dan tampal ke 1500 sel
- Pilih 1500 sel. Laman Utama, Cari & Pilih, Pergi ke Istimewa, Pemalar untuk memilih setiap sel ketiga
- Kemudian, satu baris VBA untuk memindahkan baris atau lajur N pilihan.
- Akhirnya, Makro VBA untuk melakukan semuanya
- Petua Hebat: Jika anda menggunakan dialog Ctrl + G untuk Pergi Ke, ini menunjukkan julat yang baru dipilih.
- Petua Hebat: Dalam dialog Pergi Ke, tahan Shift untuk memilih dari Sel Semasa ke sel Pergi Ke.
- Petua VBA: Menggunakan UsedRegion untuk mencari baris terakhir dalam lembaran kerja
Transkrip Video
Belajar Excel Dari, Podcast Episode 2108: Pilih Setiap Sel Ketiga.
Ini adalah doozy. Kuldeep menghantar soalan. Dia mengatakan bahawa dia mempunyai data di E24 hingga BEV24. Itu 1500 sel. Dia perlu memilih setiap sel ketiga. (tidak dapat difahami - 00:14) makro kesatuan terlalu panjang dan menghasilkan kesilapan. Apa yang dia bicarakan, makro kesatuan?
Dia bercakap tentang, dia sudah mencuba ini, HOWTOSELECTEVERYTHIRDCELL. Rakam sedikit makro di sini. Pilih sel ini dan kemudian kunci KAWALAN, sel itu, sel itu, sel itu, sel itu, sel itu. (tidak difahami - 00:33) terlalu jauh. Saya hanya ingin melihat bagaimana mereka merekodkan kod tersebut. Hentikan rakaman. ALT + F8. HOWTOSELECTEVERYTHIRDCELL, EDIT, dan ini benar-benar buruk. Tidak ada cara ajaib untuk memilih setiap sel ketiga. Anda hanya perlu menyenaraikan 500 sel di dalamnya, yang mana akan memakan masa lebih lama daripada memilih 500 sel, bukan? Tidak ada gunanya. Tidak ada gunanya, tidak berguna, tidak ada gunanya. (Sehingga - 01:00) perekam makro tidak mempunyai cara yang lebih baik untuk melakukan ini.
Oleh itu, saya berkata kepada Kuldeep, apa yang harus kita lakukan, perkara yang harus kita manfaatkan, adalah sel khas. Secara kebetulan saya berkata, adakah setiap sel ketiga berangka dan semua yang lain adalah teks? Tidak, katanya. Baiklah, jadi inilah yang akan saya lakukan. Saya akan pergi ke barisan baru dan meletakkan 1 dan kemudian tidak ada apa-apa, dan saya akan menyalin ketiga sel ini, ketiga sel seperti itu, dan yang akan saya lakukan ialah saya ' Saya akan pergi ke akhir dan pilih semua sel tersebut. Sekarang, ini adalah 1500 sel yang merupakan kelipatan dari 3, dan tampal, dan apa yang akan dilakukan untuk saya ialah ia akan memberi saya setiap sel ketiga akan berangka, seperti itu, dan yang indah adalah, apa yang kita boleh lakukan ialah, pilih dari sini, taip BEV26, dan saya akan menahan kekunci SHIFT apabila saya mengklik OK, dan itu akan memilih hingga akhir, dan kemudian HOME,FIKIR & PILIH, PERGI KE KHAS, dan saya mahukan KONSTAN, klik OK, dan apa yang saya buat sekarang ialah saya berjaya memilih setiap sel ketiga dengan cepat.
Anda berkata, baik, apa kebaikan itu? Bagaimana anda menolak pemilihan, yang merupakan soalan yang bagus, tetapi inilah yang akan kami lakukan. Kami akan beralih ke VBA. ALT + F11, ALT + F11, CONTROL + G, dan sedikit kod cantik ini di sini. Dari pilihan, kita akan mengimbangi beberapa baris ke bawah, sebilangan lajur di atas, dan pilih, baiklah? Oleh itu, melihat data, saya ingin pergi ke Bill Jelen di E23. Sebenarnya, saya mahu pergi ke Kuldeep di E24, iaitu 2 baris ke atas. Jadi, saya akan mengatakan naik 2 baris, tekan ENTER, dan pilihan itu, yang setiap sel ketiga, kini akan bergerak ke atas.
Bukankah itu mengagumkan, dan, sebenarnya, saya menulis empat makro kecil, satu yang disebut bergerak ke atas, bergerak ke bawah, bergerak ke kiri, bergerak ke kanan, kerana ketika saya menunjukkan Kuldeep kaedah ini, dia seperti, oh tidak, ada 20 perkara yang saya perlu lakukan. Jadi, di sini, kita akan klik makro bergerak ke atas yang seharusnya menggerakkan saya ke baris 23, dan kemudian gerakkan makro kanan, makro kanan bergerak, bergerak ke bawah, kiri, kiri, kanan? Lihat, kita hanya boleh … kita dapat … setelah kita mendapatkan perkara itu di sana, kita sangat keren untuk dapat memindahkan barang-barang, anda tahu, dan kemudian, dari sana, terdapat banyak perkara lain yang ingin dilakukan Kuldeep . Dia mahu menyalin dan menampal (tidak dapat difahami - 03:14) memindahkan ke tempat lain, betul, dan itu semua perkara mudah, secara relatif. Ia memilih setiap sel ketiga.
Sekarang, apa yang akan saya tunjukkan di sini - kerana saya mengesyaki Kuldeep ingin melakukan semua ini secara makro dan tidak mahu melakukan langkah itu berulang-ulang kali, dan saya memuji itu, itu mengagumkan - adakah saya akan katakan kepada Kuldeep, perkara pertama yang ingin saya lakukan ialah saya mahu anda memilih semua sel. (Di mana - 03:35) anda ingin memilih setiap sel ketiga, saya mahu anda memilih semua sel seperti itu, baiklah, dan kemudian kita akan katakan menghitung berapa banyak lajur yang kita ada, mengetahui dari mana kita bermula, dan kemudian cari keluar baris yang tersedia seterusnya, dan saya menggunakan USEDRANGE untuk mengetahui di mana baris terakhir. Saya menambah 2 baris untuk itu, dan apa yang harus dilakukan hanyalah mencari baris kosong yang bagus di baris 27. Mari kita lihat, dan 27 adalah baris kosong. Kod akan meletakkan 1 di lajur 5 dari baris kosong itu,dan kemudian akan menyalin 3 sel. Jadi, E, F, dan G ada dalam 3 sel yang akan kita salin di sana dan kita akan menyalinnya ke 1500 lajur, yang akan menghasilkan satu siri 1s dan kosong, kosong, 1, kosong, kosong, 1, kosong, kosong, hingga akhir data kami, dan kemudian SPECIALCELLS, ini adalah rumah, cari dan pilih, pergi ke sel khas, pilih pemalar, .PILIH.
Baiklah, jadi, sekarang, data itu dipilih, dan kemudian kita tahu bahawa kita ingin naik 4 baris dan, bam, seperti itu, ia naik, dalam kes ini ke baris 23. Kuldeep mahu baris 24, (sesuaikan kod satu bit - 04:43) dan kemudian tekan anak panah ke bawah, dan kami sudah bersedia.
Itulah kaedah terbaik untuk saya melakukannya. Sekiranya ada yang mempunyai kaedah yang lebih baik untuk memilih setiap sel ketiga (tidak dapat difahami - 04:52) cara yang baik untuk melakukan itu atau setiap sel lain atau setiap sel keempat, dengan segala cara, tinggalkan beberapa komen di komen YouTube.
Baiklah, hei. Saya belum mempromosikan buku Power Excel With atau buku VBA dengan makro. Banyak petua dan trik cemerlang dalam buku-buku tersebut. Klik i di sudut kanan atas untuk membaca lebih lanjut mengenai buku ini.
Baiklah. Jadi, dalam episod ini, Kuldeep ingin memilih setiap sel ketiga untuk 1500 sel. Dia cuba menulis makro untuk menyatukan semua 500 sel, tetapi terlalu panjang dan menyebabkan ralat kompilasi. Jadi, penyelesaian 1: bina susunan 3 sel dengan 1, kosong, kosong; salin 3 sel tersebut dan tampal ke 1500 sel; yang menghasilkan julat lajur 1500 sel sel dengan 1, kosong, kosong, 1, kosong kosong; pilih 1500 sel, cari dan pilih, pergi ke khas, pemalar, pilih setiap sel ketiga; maka satu baris VBA, selection.offset.select, untuk menaikkan sebilangan baris atau lajur atau apa sahaja; dan akhirnya (tidak difahami - 05:52) Makro VBA untuk melakukan semuanya.
Saya ingin mengucapkan terima kasih kepada Kuldeep kerana telah menghantar soalan itu dan saya ingin mengucapkan terima kasih kerana berhenti. Kami akan berjumpa anda di lain kali untuk siaran net lain dari.
Muat turun fail
Muat turun fail sampel di sini: Podcast2108.xlsm
