• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

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

  • Konbuyu başlatan Konbuyu başlatan k0081
  • Başlangıç tarihi Başlangıç tarihi
Katılım
17 Haziran 2008
Mesajlar
1,874
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
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.
 
dateValue kısmında hata verdi. (

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

Mesaj:

Expected array
 
Tamamdır. Teşekkür ediyorum.
 
Geri
Üst