Çözüldü Ayın ilk gününden son gününe kadar sıralatmak

  • Konuyu başlatan Konuyu başlatan merakli
  • Başlangıç tarihi Başlangıç tarihi
M

merakli

Site Üyesi
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar.
exceldestek'in kapandığını görünce ilk şokumu yaşadım neyseki burada yine eski arkadaşları ve özellikle @Ömer BARAN beyin aktif olduğunu görünce memnun oldum.
Uzun bir aradan sonra yeni bir mekanda ilk sorumu sormak bugüne nasipmiş.

@Ömer BARAN beyin önceden bir makrosuyla uğraşıyorum.
Makro aşağıdaki gibi hafta bütünlüğünü bozmadan
G1=Yıl
G2=Ay
seçerek
ayları oluşturuyor.
Burada makroda yapmak istediğim değişiklik ise
seçilen yıla ait ayın hafta bütünlüğü olmaksızın 1. gününden sonuncu gününe kadar takvimini oluşturmak

Screenshot_2.webp


makro şu şekilde



VBA: 
You must log in to view content
(28 satır)

i ve s değişkenlerine atanan kısımda nasıl bir değişiklik yapmalıyım ki
örneğin ekim 2022 i seçtiğimde 1 ekimden 31 ekime kadar olan günleri sıralatabileyim?
 
Çözüm
Ö
@merakli

Mevcut Worksheet_Change kodunu aşağıdakiyle değiştirerek denemeler yapın bakalım.
Çalışma mantığı şöyle:
-- 31 günlük sütun oluşumu sağlanır.
-- alan boşaltılır,
-- tarihler yazdırılır,
-- 31 gün için ayrılan ama tarih yazdırılmayan (boş kalan) sütunlar silinir.

VBA: 
You must log in to view content
(8 satır)
Tarihe göre sırala Oylamaya göre sırala
@merakli
Keşke kodların içerisinde ve çalışır durumda olduğu bir örnek belge ekleseymişsiniz.
İsteğiniz sadece, takvim alanında, seçilen aydan önceki ve sonraki aya denk gelen sütun içeriklerinin BOŞ olması mı?
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
@merakli
Keşke kodların içerisinde ve çalışır durumda olduğu bir örnek belge ekleseymişsiniz.
İsteğiniz sadece, takvim alanında, seçilen aydan önceki ve sonraki aya denk gelen sütun içeriklerinin BOŞ olması mı?
Genişletmek için tıklayın ...
Boş olması değil hiç o sütunların olmaması şeklinde
Dosya eklerdim ama ilk mesajım siteye şimdi girdim altın üyeliğim şuan yok yüklenen doyayı muhtemelen göremeyeceğim için eklememiştim.
Aşağıya ekliyorum yinede

VİP satın aldım şuan artık örnek dosya alıp-vermemde sorun yok sanırım.
 

Ekli dosyalar

Son düzenleme:
Oyla 0 Olumsuz oyla
@Ömer BARAN Bey,
Sizin pandemi döneminde en son oluşturduğunuz dosyayıda ekleyeyim.
Üstteki dosya üzerinde ben kendim çalışıyordum size yabancı gelebilir
Birde en sağdaki sütunlar kalacağı için üstteki dosya belki kafa karışıklığına sebep olabilir
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
@merakli

Mevcut Worksheet_Change kodunu aşağıdakiyle değiştirerek denemeler yapın bakalım.
Çalışma mantığı şöyle:
-- 31 günlük sütun oluşumu sağlanır.
-- alan boşaltılır,
-- tarihler yazdırılır,
-- 31 gün için ayrılan ama tarih yazdırılmayan (boş kalan) sütunlar silinir.

VBA: 
You must log in to view content
(19 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
Yanıt için giriş yapmanız veya üye olmanız gerekir.

Benzer Konular Popüler Daha Fazlası

Üst