Rakamları Yazıya Çevirme

YasarPiskin

Kullanıcı
Katkı: %5
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Rakamları yazıya çevirme hususunda yardımlarınızı rica ediyorum. 10 (ON), 20 (YİRMİ), 100 (YÜZ) .... gibi.
 

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Parasal değerleri yazıya çeviren bir makro-function (KTF) kodu veya EKLENTİsi elenizde mevcutsa;

-- Diyelim bu KTF'nin adı YazıyaCevir
VBA ekranında bu KTF'ye ait kodlarda, "Türk Lirası" ifadelerini silerseniz mesele kalmaz.

-- Ya da ilgili kod, eklenti olarak AKTİF veya ilgili belgedeki bir MODULde olmak koşuluyla;
hücreye =YazıyaCevir(A1) değil de aşağıdaki gibi bir formül yazarsanız mesele kalmaz.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

Böyle bir KTF kodu elinizde yoksa, aşağıdaki konu sayfasında yer alan 5 numaralı cevapta mevcut olan
CEVIR isimli bir FUNCTION kodlarını da kullanabilirsiniz.

.
 
Oyla 0 Olumsuz oyla
Sayın @yasarpiskin .

-- Son mesajınız Sayın @Erol U. 'nun eklediği örnek belgeyle ilgiliyse; D16 birleştirilmiş hücresindeki formüü aşağıdakiyle değiştirin.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

-- Yazıya çevrilecek sayı sanırım her zaman 1000'den küçük.
Eğer öyleyse KTF (Kullanıcı Tanımlı Fonksiyon - makro kodlarıyla) yerine, aşağıda gösterdiğim, Excel'in yerleşik işlevleriyle oluşturduğum formül de yazıya çevirme işini halleder. Bu formülü; ya mevcut formülde yerine koyarak ya da formülü başka bir hücreye uygulayıp, asıl formülünüzde, bu formülü uyguladığınız hücreyi adres göstererek mevcut metinle birleştirebilirsiniz.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.

Benzer konular Benzer kaynaklar Benzer dosyalar

Geri
Üst