Ay Seçildiğinde Farklı Sayfalardan Listeleme

  • Konuyu başlatan Konuyu başlatan Ergcbk
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Ergcbk

Kullanıcı
Katkı: %0
Excel Versiyonu
Excel 2010
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar,

Ekli dosyada “İşyeri Bazında Dolan-Boşalan” sayfasındaki “B3” Satırındaki Ay seçildiğinde ;

“KKY DOLAN” sayfasındaki “C” sütu ile,

“KKY BOŞALAN” sayfasındaki “B” sütununda bulunan işyerleri birleştirilerek süzülüp “İşyeri Bazında Dolan-Boşalan” sayfasındaki “A” sütununa yazılacak.

Şimdiden ilgileneceğinizi ümit ederek teşekkür ederim.
 

Ekli dosyalar

Çözüm
ExcelDepo

ExcelDepo

Merhaba, "İşyeri Bazında Dolan-Boşalan" sayfasının B3 hücresinden ay seçildiğinde, KKY DOLAN sayfasının E sütunu ile KKY BOŞALAN sayfasının B sütunundaki işyerlerini tekrarsız birleştirip A8:A55 aralığına yazmak için aşağıdaki kodu yeni bir modüle ekleyebilirsiniz. Listeye yalnız o ayda 2021 veya 2022 için vagon ya da ton hareketi olan işyerleri alınır.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (8 satır). Giriş Yap
Tarihe göre sırala Oylamaya göre sırala
İstediğiniz işlemi inceledim fakat verileri birleştirip tek sayfaya yazma işlemi basit bir işlem değil. Birden fazla yılı içeriyor ve çok fazla sütuna sahip.
 
Oyla 0 Olumsuz oyla
Ekli dosyada “İşyeri Bazında Dolan-Boşalan” sayfasındaki “B3” Satırındaki Ay seçildiğinde ;
KKY DOLAN sayfasından E, KKY BOŞALAN sayfasından B sütunlarını süzecek. “İşyeri Bazında Dolan-Boşalan” sayfasındaki “A” sütununa yazılacak.
 
Oyla 0 Olumsuz oyla
Merhaba, "İşyeri Bazında Dolan-Boşalan" sayfasının B3 hücresinden ay seçildiğinde, KKY DOLAN sayfasının E sütunu ile KKY BOŞALAN sayfasının B sütunundaki işyerlerini tekrarsız birleştirip A8:A55 aralığına yazmak için aşağıdaki kodu yeni bir modüle ekleyebilirsiniz. Listeye yalnız o ayda 2021 veya 2022 için vagon ya da ton hareketi olan işyerleri alınır.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (47 satır). Giriş Yap

Ardından sayfanın kod bölümündeki Worksheet_Change yordamına iki satır eklenmelidir. Birincisi B3 bloğunda, Set kkd = Sheets("KKY DOLAN") satırının hemen üstüne:

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

İkincisi L3 bloğunda, Call aylik satırının hemen üstüne:

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

Kod nasıl çalışır?
  1. Seçilen ayın sütunu ay numarasından bulunur: KKY DOLAN için 10 + (ay - 1) × 3, KKY BOŞALAN için 6 + (ay - 1) × 2. 2022 verisi dolan sayfasında 36, boşalan sayfasında 24 sütun sağdadır.
  2. Hareketi olan işyerleri sözlüğe alınır; böylece iki sayfada da geçen işyeri listede bir kez yer alır.
  3. A8:A55 ile B:I ve L:S sütunlarındaki eski değerler temizlenir, yeni liste yazılıp alfabetik sıralanır.
  4. Mevcut kodunuz sonrasında tutarları yeni listeye göre hesaplar. L3 seçildiğinde liste, Ocak'tan seçilen aya kadar olan hareketlerden oluşur.

Notlar
  • Kod, dosyanızın bir kopyasında Ocak, Ağustos, Ekim ve Aralık ayları ile L3 için 3 ve 10 değerleriyle denendi; liste ve 56. satırdaki toplamlar kaynak sayfalarla aynı çıktı. Ekim için 35, Aralık için 7 işyeri listelendi.
  • A sütunu tek olduğu için aylık ve kümülatif bloklar aynı anda dolu kalmaz: B3 seçilince L:S, L3 seçilince B:I temizlenir. Aksi halde bir bloktaki rakamlar diğer listenin satırlarıyla karışırdı.
  • Liste alanı, 56. satırdaki Toplam nedeniyle 48 satırdır. İşyeri sayısı bunu aşarsa uyarı verilir ve mevcut liste değiştirilmez.
  • İşlemi geri almak mümkün olmadığı için önce dosyanın bir kopyasında denemeniz uygun olur.
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Benzer konular Benzer kaynaklar Benzer dosyalar

Geri
Üst