Sayıyı Yazıya Çevirme

[ultraslan38080]

Excel dosyasında bir hücredeki rakamı başka bir hücreye yazı olarak yazmak istiyorum. Alt+F11 ile kod yapıştırdım ama beceremedim. Yardımcı olabilir misiniz?
(Bir de iki ufak değişiklik konusunda sizden yardım talep ediyorum)

 

[YUSUF44]

Ekli dosyayı inceleyiniz:

https://drive.google.com/file/d/0B43WMUs21VpfaWYwODBHdE81Q28/view?usp=sharing

Dosyanızda gereksiz birleştirme yapmaktan kaçınınız. Sütunları küçültüp sonra küçük hücreleri birleştirerek büyük hücre(ler) elde etmiştiniz. Halbuki hücrelerin büyüklüğünü istediğiniz gibi ayarlama imkanınız var. Ekli dosyada da göreceğiniz gibi bir gün için 2 hücreyi birleştirmeye gerek yoktur, tek hücre yeterlidir.

Dosyada ayı seçip/yazıp; yılı yazdığınızda o aya ait günler tabloya işlenir, haftasonları gri ile boyanır, o ayda olmayan günlerin sütunu gizlenir.

Sayıyı yazıya çevirmek için muhtemelen çok eskiden bu siteden aldığım cevir adlı kullanıcı tanımlı fonksiyonu kullandım.

 

[ultraslan38080]

Çok çok teşekkür ediyorum. Çok sağolun

 

[ultraslan38080]

Bir Sorum daha olacak

15. satırda metin sonundaki tarih ile altta ONAYLAYAN kelimesinin altında bulunan tarihi ayın son günü, eğer son günü tatile denk geliyorsa haftaiçine denk gelen son günü yapabilir miyiz?
Yani kısaca o iki yerdeki tarihler ayın son iş günü olabilir mi?

 

[Korhan Ayhan]

Onaylayan bölümünün altındaki tarih için deneyiniz.

Diğer bölüme siz uyarlarsınız...

=EĞER(VE(HAFTANINGÜNÜ(BUGÜN();2)>=1;HAFTANINGÜNÜ(BUGÜN();2)<=5);BUGÜN();EĞER(HAFTANINGÜNÜ(BUGÜN();2)=6;BUGÜN()-1;BUGÜN()-2))

 

[ultraslan38080]

Onaylayan bölümünün altındaki tarih için deneyiniz.

Diğer bölüme siz uyarlarsınız...

=EĞER(VE(HAFTANINGÜNÜ(BUGÜN();2)>=1;HAFTANINGÜNÜ(BUGÜN();2)<=5);BUGÜN();EĞER(HAFTANINGÜNÜ(BUGÜN();2)=6;BUGÜN()-1;BUGÜN()-2))

Denedim ancak ekim ayı için haftanın son iş günü 31 Ekim Salı olmasına rağmen, bugünün tarihini yani 24 Ekimi verdi.

 

[ultraslan38080]

Onaylayan bölümünün altındaki tarih için deneyiniz.

Diğer bölüme siz uyarlarsınız...

=EĞER(VE(HAFTANINGÜNÜ(BUGÜN();2)>=1;HAFTANINGÜNÜ(BUGÜN();2)<=5);BUGÜN();EĞER(HAFTANINGÜNÜ(BUGÜN();2)=6;BUGÜN()-1;BUGÜN()-2))

Bir önceki mesajı silemedim kusura bakmayınız. Haftanın son iş günü değil, Ayın son iş günü olacak.

 

[Korhan Ayhan]

Deneyiniz.

Ali beyin bir mesajından alıntıdır...

=TARİH(YIL(BUGÜN());AY(BUGÜN())+1;MİN(0;5-HAFTANINGÜNÜ(TARİH(YIL(BUGÜN());AY(BUGÜN())+1;6))))