Çözüldü Otomatik Pazar Günleri Yazılması

[k0081]

Merhaba arkadaşlar,

Bir tablom var. Şu şekilde;

C3 hücresinde, (birleştirilmiş hücredir. C3-C4) PERSONEL ( EYLÜL 2025 ) şeklinde bir veri var.

D3:AH3 arasında 1-2-3-4...31 şeklinde gün sayıları var.

D4..AH4 birleştirmiş bir hücrem var.

D5:AH105 aralığında "GENEL" biçiminde hücrelerim var.

=========== YAPMAK İSTEDİĞİM ==============

C3 e PERSONEL ( EYLÜL 2025 ) girdiğimde,

D5:AH105 aralığına D3:AH3 aralığındaki gün sayılarına bakarak Pazar gününe denk gelen hücreye PZR şeklinde kırmızı renkte Pazar günü ismini yazdırmak.

yardımcı arkadaşa şimdiden teşekkürler.

 

[k0081]

dateValue kısmında hata verdi. (

month = month(dateValue("01-" & Mid(ws.Range("C3").Value, 11, 6)))

Mesaj:

Expected array

 

[muhasebeciyiz]

İndir pazar xlsm

Dosyayı indir pazar xlsm

dosya.co

dENEYİNİZ

 

[k0081]

Tamamdır. Teşekkür ediyorum.