tarihi yazıya çevirme
- Konbuyu başlatan irfem4
- Başlangıç tarihi
- Katılım
- 19 Nisan 2006
- Mesajlar
- 6,678
- Excel Vers. ve Dili
- Excel 2013-Türkçe
Excel 2016-Türkçe
Site içinde arama yaparsanız İhsan Bey ve Ömer Bey'in bununla ilgi güzel bir paylaşımı mevcut.
- Katılım
- 23 Eylül 2004
- Mesajlar
- 1,754
- Excel Vers. ve Dili
- Excel 2010 TR
ekli dosyayı incelermisiniz.
Son düzenleme:
- Katılım
- 23 Eylül 2004
- Mesajlar
- 1,754
- Excel Vers. ve Dili
- Excel 2010 TR
ccc = Format(Month(Tarih), "MMMM")
kısmını aşağıdaki gibi değiştirirmisiniz.
ccc = Format(Tarih, "MMMM")
- Katılım
- 23 Eylül 2004
- Mesajlar
- 1,754
- Excel Vers. ve Dili
- Excel 2010 TR
verdiğiniz veriyi nereden değiştireceğim
dosyayı ekliyorum açtıktan sonra Alt+F11 tuşuna basarak kodları gorebilirsiniz.
- Katılım
- 19 Nisan 2006
- Mesajlar
- 6,678
- Excel Vers. ve Dili
- Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba,
Uzun aramalar sonucu Sayın Ömer Bey'in formülünü buldum.
Tarihi A1 hücresine yazın ve deneyiniz.
Uzun aramalar sonucu Sayın Ömer Bey'in formülünü buldum.
Tarihi A1 hücresine yazın ve deneyiniz.
Kod:
=EĞER(GÜN(A1)>9;ELEMAN(SOLDAN(GÜN(A1);1);"On";"Yirmi";"Otuz");"")& ELEMAN(SAĞDAN(GÜN(A1);1)+1;"";"Bir";"İki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz")&" "&METNEÇEVİR(A1;"aaaa")&" "&ELEMAN(SOLDAN(YIL(A1);1);"";"İki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz")&"Bin"&EĞER(PARÇAAL(YIL(A1);2;1)+0=0;"";ELEMAN(PARÇAAL(YIL(A1);2;1);"";"İki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz")&"Yüz")&EĞER( METNEÇEVİR(A1;"yy")+0>9;ELEMAN(SOLDAN(METNEÇEVİR(A1;"yy");1);"On";"Yirmi";"Otuz";"Kırk";"Elli";"Altmış";"Yetmiş";"Seksen";"Doksan");"")&ELEMAN(SAĞDAN(METNEÇEVİR(A1;"yy");1)+1;"";"Bir"; "İki";"Üç";"Dört";"Beş";"Altı";"Yedi";"Sekiz";"Dokuz")