- Katılım
- 12 Eylül 2004
- Mesajlar
- 871
- Excel Vers. ve Dili
-
Excel 2019 Türkçe (Ev)
Excel 2013 Türkçe (Okul)
For a = 1 To 31
Controls("label" & a + 16) = Format(DateSerial(Year(Date), Month(Date), a), "dddd.d.mmmm.yyyy")
Next
Bu kod ile Label 1 nden 31 ne tarih yazdırabiliyorum ancak ben örneğin 15 Ocak 14 Şubatı yazdırmak istiyorum.Tüm ayları bu şekilde olacak Maaş başlagıç günü ssk lılarda 15 olduğu için Maaş başlangıç günü sabiti bordrodegis sayfası d1 hücresinde verilerin yazılacağı çalışma sayfası ise GÜNDÜZ adlı çalışma sayfası .Yardımcı olacak arakadaşlara şimdiden teşekkürler.
Controls("label" & a + 16) = Format(DateSerial(Year(Date), Month(Date), a), "dddd.d.mmmm.yyyy")
Next
Bu kod ile Label 1 nden 31 ne tarih yazdırabiliyorum ancak ben örneğin 15 Ocak 14 Şubatı yazdırmak istiyorum.Tüm ayları bu şekilde olacak Maaş başlagıç günü ssk lılarda 15 olduğu için Maaş başlangıç günü sabiti bordrodegis sayfası d1 hücresinde verilerin yazılacağı çalışma sayfası ise GÜNDÜZ adlı çalışma sayfası .Yardımcı olacak arakadaşlara şimdiden teşekkürler.