Excel’de filtrelemeden sonra ilk görünür hücrenin değerini nasıl bulup alabilirsiniz?
Bazı durumlarda, filtrelenmiş bir listede ilk görünür hücrenin değerini almanız gerekebilir. Peki bunu nasıl yaparsınız? Bu makale, bu sorunu çözmek için etkili yöntemleri sizinle paylaşacak.
Filtrelemeden sonra dizi formülüyle ilk görünür hücrenin değerini bulun ve alın
Filtrelemeden sonra VBA ile ilk görünür hücrenin değerini bulun ve alın
Filtrelemeden sonra dizi formülüyle ilk görünür hücrenin değerini bulun ve alın
Filtrelenmiş bir listede ilk görünür hücrenin değerini almak için aşağıdaki dizi formülünü kullanabilirsiniz. Lütfen aşağıdaki adımları izleyin.
1. İlk görünür değeri yerleştirmek için boş bir hücre seçin, aşağıdaki formülü girin ve ardından Ctrl+Shift+Enter tuşlarına aynı anda basın.
=INDEX(C2:C19,MIN(IF(SUBTOTAL(3,OFFSET(C2,ROW(C2:C19)-ROW(C2),0)),ROW(C2:C19)-ROW(C2)+1)))
Not: Formülde C2:C19, filtrelenmiş listede ilk görünür hücre değerini döndürmek istediğiniz aralıktır; C2 ise listenin ilk hücresidir. Bunları ihtiyacınıza göre özelleştirebilirsiniz.
Daha sonra, yukarıdaki ekran görüntüsünde gösterildiği gibi, seçili hücrede filtrelenmiş listenin ilk görünür hücresinin değerini görebilirsiniz.
Filtrelemeden sonra VBA ile ilk görünür hücrenin değerini bulun ve alın
Yukarıdaki dizi formülünü kullanarak filtrelenmiş bir listede ilk görünür hücrenin değerini almakla birlikte, aynı listedeki ilk görünür hücresine hızlıca ulaşmak için aşağıdaki VBA betiğini de çalıştırabilirsiniz. Lütfen aşağıdaki adımları izleyin.
1. Filtrelenmiş bir listenin ilk görünür hücre değerini almak için E8 gibi boş bir hücre seçin.
2. Alt+F11 tuşlarına aynı anda basarak Microsoft Visual Basic for Applications penceresini açın.
3. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül seçeneğine tıklayın. Ardından aşağıdaki VBA kodunu Modül penceresine kopyalayıp yapıştırın.
VBA kodu: Excel'de filtrelemeden sonra ilk görünür hücrenin değerini bulun ve alın
Sub FirstVisibleCell()
With Worksheets("Sheet1").AutoFilter.Range
ActiveCell.Value2 = Range("C" & .Offset(1, 0).SpecialCells(xlCellTypeVisible)(1).Row).Value2
End With
End SubNot: Kodda Sheet1, filtrelenmiş listeyi içeren sayfanın adıdır. “C” ise ilk görünür değerini almak istediğiniz sütundur. Bunları ihtiyacınıza göre özelleştirebilirsiniz.
4. Kodu çalıştırmak için F5 tuşuna basın; böylece C sütunundaki filtrelenmiş listenin ilk görünür hücresi hemen E8 hücresine doldurulur.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar