Word belgesinde bir sayıyı yazıyla nasıl dönüştürebilirim?
Bu makale, Word belgesinde sayıları İngilizce yazıya nasıl dönüştüreceğinizi açıklar. Konuyla ilgileniyorsanız, ayrıntıları görüntülemek için okumaya devam edin.
Sayıyı VBA ile İngilizce yazıya dönüştürme
Sayıyı Kutools for Excel ile Excel’de İngilizce yazıya dönüştürme
Sayıyı VBA ile İngilizce yazıya dönüştürme
1. Yazıya dönüştürmek istediğiniz sayıyı seçin, ardından Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodları kopyalayarak Modül betiğine yapıştırın.
VBA: Sayıyı yazıya 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 Sub3. Kodu çalıştırmak için F5 tuşuna basın; artık sayı yazıya dönüştürülmüştür.
Not: Bu kod her seferinde yalnızca tek bir sayı için çalışır.
Kutools for Excel ile sayıyı İngilizce yazıya dönüştürme
Excel sayfasında sayıları İngilizce veya Çince yazıya ya da İngilizce veya Çince para birimine dönüştürmek istiyorsanız, Kelimeye Dönüştür özelliğini Kutools for Excel’de bulabilirsiniz. Bu kullanışlı araç, dönüştürme işlemlerinizi kolaylaştırır!
Kutools for Excel’i ücretsiz olarak yükledikten sonra aşağıdaki adımları izleyin:
1. Dönüştürmek istediğiniz hücreleri seçin, ardından Kutools > İçerik > Kelimeye Dönüştür seçeneğine tıklayın.
2. Açılan iletişim kutusunda İngilizce ve Para birimine dönüştürme seçeneklerini işaretleyin.
3. Tamam veya Uygula düğmesine tıklayın; seçili sayılar yazıya dönüştürülecektir.
En İyi Ofis Verimlilik Araçları
Kutools for Word ile Word deneyiminizi 100'den fazla göz alıcı özellikle 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 Uzmanlığı: Sayfaları Böl / Belgeleri Birleştir / Seçimi Çeşitli Biçimlerde Dışa Aktar (PDF/TXT/DOC/HTML…) / Toplu PDF Dönüştürme…
✏İçerik Düzenleme: Birden Fazla Dosyada Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır / Satırları ve Sütunları Çevirerek Tabloyu Döndür / Tabloyu Metne Dönüştür…
🧹Zahmetsiz Temizlik: Fazladan Boşlukları, Bölüm Sonlarını, Metin Kutularını ve Köprüleri kaldırmak için daha fazla araç bulmak üzere Kaldırgrubuna gidin…
➕Yaratıcı Ekleme Araçları: Binlik Ayırıcılar, Onay Kutusu, Radyo Düğmesi, QR Kodu, Barkod, Birden Çok Resim ve daha fazlasını Eklegrubunda keşfedin…
🔍Hassas Seçimler:Belirli Sayfaları/Tabloları/Şekilleri/Başlık Paragrafı/ Gezinmeyi daha fazla özelliğiyle geliştirin Seç…
⭐Yıldızlı Geliştirmeler: Herhangi Bir Konuma Git / Tekrarlanan Metni Otomatik Ekle / Belgeler Arasında Geçiş Yap Windows / 11Araçları Dönüşüm…
🌍40+ Dil Desteği: Kutools’u istediğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve 40’tan fazla başka dil dahil olmak üzere kapsamlı dil desteği sunuyor!
Office Tab- Office’a Sekmeli Arabirim Getirir, İşlerinizi Çok Daha Kolaylaştırır
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project’te sekmeli düzenleme ve okumayı etkinleştirin.
- Yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Günlük verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
✨ Kutools for Office – Tek Kurulum, Beş Güçlü Araç!
İçerir Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint
📦 Tüm 5 araçları tek bir pakette alın | 🔗 Microsoft Office ile sorunsuz entegrasyon | ⚡ Zamanı Kaydet ve verimliliği hemen artırın
En İyi Ofis Verimlilik Araçları
Kutools for Word- Word için 100+ Araç
- 🤖KUTOOLS AI Özellikleri:Yapay Zeka Asistanı/Gerçek Zamanlı Asistan/Süper Parlat/Süper Çeviri/AI Redaksiyon/Yapay Zeka Düzeltme
- 📘Belge Uzmanlığı:Sayfaları Böl/Belgeleri Birleştir/Toplu PDF Dönüştürme
- ✏İçerik Düzenleme:Toplu Bul ve Değiştir/Tüm Resimleri Yeniden Boyutlandır
- 🧹Zahmetsiz Temizlik:Fazladan Boşlukları Kaldır/Bölüm Sonu Kaldır
- ➕Yaratıcı Ekleme Araçları:Binlik Ayırıcılar Ekle/Onay Kutusu Ekle/QR Kodu Oluştur
- 🌍40+ Dil Desteği: Kutools sizin dilinizde konuşur – 40’tan fazla dil desteğiyle!