Skip to main content

Word belgesinde sayıları kelimelere nasıl dönüştürürüm?

Author: Sun Last Modified: 2025-08-07

Bu makale, Word belgesindeki sayıları İngilizce kelimelere dönüştürme yönteminden bahsediyor. İlginizi çekiyorsa lütfen devam edin ve ayrıntıları görüntüleyin.

VBA ile sayıları İngilizce kelimelere dönüştürme

Excel'de Kutools for Excel ile sayıları İngilizce kelimelere dönüştürme

VBA ile sayıları İngilizce kelimelere dönüştürme

1. Kelimeye dönüştürmek istediğiniz sayıyı seçin ve Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ekle > Modül'e tıklayın ve aşağıdaki kodları kopyalayıp Modül betiğine yapıştırın.

VBA: Sayıyı kelimeye dönüştürme

Sub ConvertNumberToWord()
'UpdatebyExtendoffice20181010
    Dim xDigit As Double
    Dim xBuff As String
    On Error Resume Next
    Selection.MoveLeft wdWord, 1, wdMove
    Selection.MoveRight wdWord, 1, wdExtend
    xDigit = Val(Trim(Selection.Text))
    If xDigit = 0 And Str(xDigit) <> Trim(Selection.Text) Then Exit Sub
    If xDigit > 999999 Then
        If xDigit <= 999999999 Then
            xBuff = Trim(Int(Str(xDigit / 1000000)))
            Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + xBuff + " \* CardText", True
            Selection.MoveLeft wdWord, 1, wdExtend
            xBuff = Selection.Text & " million "
            xDigit = Right(Str(xDigit), 6)
        End If
    End If
    If xDigit <= 999999 Then
        Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + Str(xDigit) + " \* CardText", True
        Selection.MoveLeft wdWord, 1, wdExtend
        xDigit = xBuff & Selection.Text
        Selection.TypeText xDigit + " "
    Else
        MsgBox "Number too large", vbOKOnly, "Kutool for Word"
    End If
End Sub

3. Kodu çalıştırmak için F5 tuşuna basın, şimdi sayı kelimelere dönüştürülmüştür.
Number converted to English words

Not: Kod aynı anda yalnızca bir sayı için çalışır.

Kutools for Excel ile sayıları İngilizce kelimelere dönüştürme

Eğer Excel çalışma sayfasında sayıları kelimelere dönüştürmek istiyorsanız, Kutools for Excel'in Numbers to Words adlı kullanışlı bir aracı vardır. Bu araç, sayıları İngilizce veya Çince kelimelere ya da İngilizce para birimine veya Çin para birimine dönüştürebilir.

Kutools for Excel,yapay zeka 🤖 ile donatılmış, görevlerinizi basitleştirmek için 300'den fazla kullanışlı özellik sunar.

ücretsiz yükledikten sonra Kutools for Excel'i lütfen aşağıdaki adımları izleyin:

1. Sayıları kelimelere dönüştürmek istediğiniz hücreleri seçin ve ardından Kutools > Metin > Numbers to Words.
Numbers to Words option on the Kutools tab on the Excel ribbon

2. Açılan diyalog kutusunda İngilizce ve Para birimine dönüştürme seçeneklerini işaretleyin.
Numbers to Words dialog box

3. Tamam veya Uygula'ya tıklayın, seçilen sayılar kelimelere dönüştürülecektir.

En İyi Ofis Verimlilik Araçları

Kutools for Word - Word Deneyiminizi 100’den Fazla Olağanüstü Özellik ile Yükseltin!

🤖 Kutools AI Özellikleri: Yapay Zeka Asistanı / Gerçek Zamanlı Asistan / Süper Parlat (Biçimi Koru) / Süper Çeviri (Biçimi Koru) / AI Redaksiyon / Yapay Zeka Düzeltme...

📘 Belge Ustalığı: Sayfaları Böl / Belgeleri Birleştir / Seçimi Farklı Formatlarda Dışa Aktar (PDF/TXT/DOC/HTML...) / Toplu Olarak PDF'ye Dönüştür...

✏ İçerik Düzenleme: Birden Fazla Dosyada Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır / Tablo Satırlarını ve Sütunlarını Çevir / Tabloyu Metne Dönüştür...

🧹 Zahmetsiz Temizlik: Fazladan Boşlukları, Bölüm Sonlarını, Metin Kutularını, Bağlantıları Temizleyin / Daha fazla kaldırma aracı için Kaldır grubunu keşfedin...

➕ Yaratıcı Eklemler: Binlik Ayırıcıları Ekle / Onay Kutuları Ekle / Radyo Düğmeleri Ekle / QR Kodu Ekle / Barkod Ekle / Birden Fazla Resim Ekle / Ekle grubunda daha fazlasını keşfedin...

🔍 Hassas Seçimler: Belirli Sayfaları, Tabloları, Şekilleri, Başlık Paragraflarını Nokta Atışıyla Seçin / Daha fazla Seç özelliğiyle gezinmeyi kolaylaştırın...

⭐ Yıldız İyileştirmeler: İstediğiniz Konuma Hızla Gidin / Yinelenen Metni Otomatik Olarak Ekleyin / Belge Pencereleri Arasında Hızla Geçiş Yapın /11 Dönüştürme Aracı...

🌍 40+ Dili Destekler: Kutools'u tercih ettiğiniz dilde kullanabilirsiniz – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40'tan fazla dil desteği!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Bu özellikleri denemek ister misiniz? Kutools for Word'u şimdi indirin! 🚀
 

En İyi Ofis Verimlilik Araçları

Kutools for Word - Word için 100+ Araç

Ücretsiz İndir Şimdi Satın Al Kutools Hakkında Daha Fazla Bilgi Edinin