Kuldeep'in her üç hücreyi 1500 hücre aralığında seçmesi gerekir. çılgın bir çözüm sunar.
Video izle
- Kuldeep, 1500 hücre için her üçüncü hücreyi seçmek istiyor
- 500 hücrenin tümünü birleştirmek için makro kodu çok uzun ve bir derleme hatasına neden oluyor!
- Çözüm: Derleme 1, boş, boş. Bu üç hücreyi kopyalayın ve 1500 hücreye yapıştırın
- 1500 hücreyi seçin. Her üçüncü hücreyi seçmek için Giriş, Bul ve Seç, Özelliğe Git, Sabitler
- Ardından, seçimi N satır veya sütun uzağa taşımak için bir satır VBA.
- Son olarak, her şeyi yapmak için bir VBA Makrosu
- Harika İpucu: Git iletişim kutusu için Ctrl + G kullanırsanız, son seçilen aralıkları gösterir.
- Harika İpucu: Git iletişim kutusunda, Geçerli Hücreden Git hücreye kadar seçim yapmak için Shift tuşunu basılı tutun.
- VBA İpucu: Çalışma sayfasındaki son satırı bulmak için UsedRegion kullanma
Video Metni
Podcast Bölüm 2108'den Excel Öğrenin: Her Üçüncü Hücreyi Seçin.
Bu bir felaket. Kuldeep bir soru gönderir. E24'ten BEV24'e kadar verilere sahip olduğunu söylüyor. 1500 hücre. Her üçüncü hücreyi seçmesi gerekiyor. (anlaşılmaz - 00:14) birleşim makrosu çok uzun ve hatalar oluşturuyor. Neden bahsediyor, sendika makrosu?
Bundan bahsediyor, bunu zaten denedi, HOWTOSELECTEVERYTHIRDCELL. Buraya küçük bir makro kaydedin. Bu hücreyi ve ardından KONTROL tuşlarını, o hücreyi, o hücreyi, bu hücreyi, o hücreyi seçin. (anlaşılmaz - 00:33) çok ileri gidin. Sadece kodu nasıl kaydettiklerini görmek istiyorum. Kaydetmeyi bırak. ALT + F8. HOWTOSELECTEVERYTHIRDCELL, EDIT ve bu gerçekten kötü. Her üçüncü hücreyi seçmenin sihirli bir yolu yoktur. Sadece oradaki 500 hücrenin tümünü listelemelisiniz, bu 500 hücreyi seçmekten daha uzun sürer, değil mi? Sadece anlamsız. Anlamsız, anlamsız, anlamsız. (Böylece - 01:00) makro kaydedicinin bunu yapmanın daha iyi bir yolu yoktur.
Bu yüzden Kuldeep'e dedim ki, yapmamız gereken şey, kaldırmamız gereken şey, özel hücreler. Şans eseri, her üç hücreden biri sayısaldır ve diğer her şey metindir dedim. Hayır, diyor. Pekala, işte yapacağım şey şu. Yepyeni bir sıraya gidip bir 1 koyacağım ve sonra hiçbir şey yapmayacağım, hiçbir şey ve bu üç hücreyi, bu üç hücreyi kopyalayacağım ve sonra yapacağım şey şu: m sonuna gideceğim ve tüm bu hücreleri seçeceğim. Şimdi, bu 1500 hücredir, bu 3'ün katıdır ve yapıştırın ve benim için yapacak olan şey, bana her üçüncü hücreyi verecek, bunun gibi sayısal olacak ve güzel olan şey, biz o zaman yapabilir, buradan seçin, BEV26 yazın ve TAMAM'a tıkladığımda SHIFT tuşunu basılı tutacağım ve bu, sonuna kadar seçecek ve ardından GİRİŞ,BUL & SEÇ, ÖZELE GİT ve SABİTLERİ istiyorum, Tamam'a tıklayın ve şimdi yaptığım şey, her üçüncü hücreyi çok hızlı bir şekilde seçmeyi başardım.
Peki, bunun ne yararı olduğunu söylüyorsun? Seçimi nasıl yukarı itiyorsunuz ki bu harika bir soru, ama yapacağımız şey şu. VBA'ya geçeceğiz. ALT + F11, ALT + F11, CONTROL + G ve buradaki bu güzel küçük kod. Seçimden, bazı satırları aşağıya kaydıracağız, bir dizi sütunu aşacağız ve seçeceğiz, tamam mı? Verilere baktığımda, E23'te Bill Jelen'e gitmek istiyorum. Aslında 2 sıra yukarıda olan E24'te Kuldeep'e gitmek istiyorum. Yani, 2 sıra yukarı çık diyeceğim, ENTER'a basın ve her üç hücrede bir olan bu seçim şimdi yukarı çıkacak.
Bu harika değil mi ve aslında dört küçük makro yazdım, biri yukarı taşı, aşağı hareket et, sola hareket et, sağa hareket et, çünkü Kuldeep'e bu yöntemi gösterdiğimde, o, oh hayır, 20 şey var yapmalı. Yani, burada, beni 23. satıra taşıması gereken yukarı taşı makrosunu tıklayacağız ve sonra sağa hareket makrosu, sağa hareket makrosu, aşağı taşı, sola, sola, sağa? Bak, biz sadece… yapabiliriz… o şeyi oraya bir kez yerleştirdiğimizde, şeyleri hareket ettirebilmekte gerçekten havalıyız, biliyorsunuz ve oradan sonra, Kuldeep'in yapmak istediği bir sürü başka şey vardı . Kopyalayıp yapıştırmak istedi (anlaşılmaz - 03:14) başka bir yere transpoze etmek istedi, değil mi ve hepsi görece kolay şeyler. Her üçüncü hücre seçiliyor.
Şimdi, size burada göstereceğim şeyi - çünkü Kuldeep'in tüm bunları bir makroda yapmak istediğinden ve adımları tekrar tekrar yapmak istemediğinden şüpheleniyorum ve hey, bunu alkışlıyorum, Bu harika - Kuldeep'e şunu söyleyeceğim, yapmak istediğim ilk şey tüm hücreleri seçmeni istiyorum. (Nerede - 03:35) her üçüncü hücreyi seçmek istiyorsanız, tüm hücreleri bunun gibi seçmenizi istiyorum, pekala ve sonra kaç tane sütunumuz olduğunu sayalım, nereden başladığımızı bulalım ve sonra bir sonraki kullanılabilir satırı dışarı çıkardım ve son satırın nerede olduğunu bulmak için USEDRANGE'ı kullanıyorum. Buna 2 satır ekliyorum ve bunun yapılması gereken, 27. satırda güzel bir boş satır bulmak. Gidip bir göz atalım ve 27 boş bir satır. Kod, boş satırın 5. sütununa 1 koyacak,ve sonra 3 hücreyi kopyalayacak. Yani, E, F ve G, oraya kopyalayacağımız 3 hücrede ve bunu 1500 sütuna kopyalayacağız, bu da 1'ler ve boş, boş, 1, boş bir dizi oluşturacak. boş, 1, boş, boş, verilerimizin sonuna kadar tüm yol ve sonra ÖZEL HÜCRELER, burası ev, bul ve seç, özel hücrelere git, sabitleri seç.
Pekala, şimdi o veriler seçildi ve sonra 4 sıra yukarı gitmek istediğimizi biliyoruz ve bam, bu durumda yukarı çıkıyor, bu durumda 23. sıraya. Kuldeep 24. sırayı istiyor (kodu ayarlayın bir bit - 04:43) ve sonra aşağı oka basın ve gitmeye hazırız.
Yapmam gereken en iyi yol bu. Herhangi biri, her üçüncü hücreyi (anlaşılmaz - 04:52) bunu yapmanın harika bir yolunu veya diğer her hücreyi veya her dördüncü hücresini seçmek için daha iyi bir yönteme sahipse, YouTube yorumlarında bazı yorumlar bırakın.
Peki, merhaba. Power Excel With kitabını veya makro içeren VBA kitabını da tanıtmadım. Bu kitaplarda birçok harika mükemmel ipucu ve püf noktası var. Kitap hakkında daha fazla bilgi edinmek için sağ üst köşedeki i tıklayın.
Peki. Bu nedenle, bu bölümde Kuldeep, 1500 hücre için her üçüncü hücreyi seçmek istiyor. 500 hücrenin tümünü birleştirmek için bir makro yazmaya çalıştı, ancak çok uzun ve bir derleme hatasına neden oluyor. Öyleyse, çözüm 1: 1, boş, boş olan 3 hücreli bir dizi oluşturun; bu 3 hücreyi kopyalayın ve 1500 hücreye yapıştırın; 1, boşluk, boş, 1, boş boşlukla 1500 hücre sütun genişliğinde bir aralık oluşturur; 1500 hücreyi seçin, bulun ve seçin, özele git, sabitler, her üçüncü hücreyi seçer; sonra bir satır VBA, selection.offset.select, birkaç satır veya sütun veya herhangi bir şeyi yukarı taşımak için; ve son olarak (anlaşılmaz - 05:52) her şeyi yapmak için bir VBA Makrosu.
Kuldeep'e bu soruyu gönderdiği için teşekkür etmek ve uğradığınız için teşekkür etmek istiyorum. Bir dahaki sefere başka bir internet yayını için görüşürüz.
Dosyayı indir
Örnek dosyayı buradan indirin: Podcast2108.xlsm
