Ayın günlerini yazdırma

[zekeriya torun]

herhangi bir yılın ayına ait günleri otomatik yazdırmaya ait formül oluşturulabilirmi.Dosyam ektedir.teşekkür ederim.

 

[halit3]

har.cet.sayfasına 2 adet düğme koydum birincisi değiştirmek için ikincisi başlangıç satır sustn değiştirmek için
not: not32 antivirüs proğramı bunu kabullenmiyebilir çünkü (ThisWorkbook.VBProject.VBComponents(Worksheets(ActiveSheet.Name).CodeName).CodeModule.Lines ) kodların içinde bu var bunuda bazen virüs görüyor kolay gelsin

 

[zekeriya torun]

ilginize teşekkür ederim.ama ben bir şey anlamadım.cevabınızın ekinde dosya olmayınca ne demek istediğinizi anlayamadım.

 

[zekeriya torun]

bu arada unutttum mes. cetveli A8 ve B8 e yıl ve ay manuel olarak giriliyor.benim istediğim B8 deki ay mayıs yerine haziran olduğunda günlerin kendiliğinden B9 dan başlayarak yazılması.selam ve saygılar

 

[1Al2Ver]

Merhaba,

MES.CET. sayfası;

1) B8'e =BUGÜN()
2) A9'a =TARİH(YIL(B8);AY(B8);1)
3) A10'a = A9+1
4) B9'a =METNEÇEVİR(A9;"gggg") yazın ve ilgili hücreleri aşağıya doğru kopyalayın

Bu şekilde çözüm elde edersiniz..

 

[zekeriya torun]

Teşekkür ederim ama benim istediğim bu değil,A sütünundaki 1.....31 rakam olacak orda bir değişiklik olmayacak sadece ay ve yıl değiştiğinde günler değişecek.saygılar

 

[halit3]

dosyanı gönderiyorum

 

[zekeriya torun]

Teşekkür ederim.Allah razı olsun.yalnız küçük bir ayrıntı var "Ay" nasıl büyük harfe çevirebilirim.birde bunu benim bu kıt excell bilgimle mantığını anlayabilirmiyim.Teşekkürler.elinize ve emeğinize sağlık.

 

[zekeriya torun]

burdaki makroları nod 32 virüs olarak algılıyor.acaba dosyaya zarar verirmi.

 

[zekeriya torun]

belgeyi kaydedemiyorum bunun nedeni nedir acaba

 

[zekeriya torun]

bunu makro yerine formül ile yapma şansım varmı.selamlar.saygılar

 

[halit3]

bu dosya çalışır herhalde 1. mesajımda söylediğim bölümleri kaldırdım

 

[zekeriya torun]

cevap alabilecekmiyim

 

[halit3]

12. mesajdaki dosyayı indir kontrol et

 

[zekeriya torun]

özür dilerim 2.sayfayı görmedim.teşekkürler allah razı olsun.ama hep merak edeceğim bunun bir formülü varmı.halit bey

 

[halit3]

evet formülüde var benim formülüm biraz uzun oldu galiba dosyanı kontrol et

 

[zekeriya torun]

ilginize teşekkür ederim.hakkınızı helal edin.

 

[zekeriya torun]

bir istirhamım sdaaha var ayları büyük harfle nasıl yazdırırız.

 

[1Al2Ver]

Merhaba,

B8'e =BÜYÜKHARF(METNEÇEVİR(BUGÜN()+D6;"AAAA")) şeklinde denermisiniz ?

 

[zekeriya torun]

Teşekkür ederim