Cum se convertește numărul în cuvinte în documentul Word?
Acest articol vorbește despre metoda de conversie a numerelor în cuvinte în limba engleză din documentul Word, vă rugăm să continuați pentru a vedea detaliile dacă sunteți interesat.
Conversia numărului în cuvinte în engleză cu VBA
Convertiți numărul în cuvinte în limba engleză în Excel cu Kutools pentru Excel
Conversia numărului în cuvinte în engleză cu VBA
1. Selectați numărul pe care doriți să îl convertiți în cuvinte, apăsați Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module, și copiați codurile de mai jos și lipiți-le în Module script-ul.
VBA: convertiți numărul în cuvinte
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. presa F5 tasta pentru a rula codul, acum numărul a fost convertit în cuvinte.
notițe: Codul funcționează doar pentru un număr de fiecare dată.
Convertiți numărul în cuvinte în limba engleză cu Kutools pentru Excel
Dacă doriți să convertiți numerele în cuvinte în foaia Excel, există un instrument la îndemână - Numere la cuvinte din Kutools pentru Excel, care poate converti numerele în cuvinte englezești sau chinezești sau poate converti numere în monedă engleză sau monedă chineză.
Dupa instalare gratuită Kutools pentru Excel, faceți următoarele:
1. Selectați celulele pe care doriți să le convertiți în cuvinte, apoi faceți clic pe Kutools > Conţinut > Numere la cuvinte.
2. În dialogul popping, bifați Engleză si Nu este convertit în valută opțiuni.
3. clic Ok or Aplică, numerele selectate vor fi convertite în cuvinte.
Cele mai bune instrumente de productivitate de birou
Kutools pentru Cuvânt - Crește-ți experiența Word cu Over 100 Caracteristici remarcabile!
🤖 Caracteristici Kutools AI: Generați conținut / Rescrie textul / Documente Întrebări și răspunsuri / Obțineți răspunsuri rapide / Traduceți documente / Document polonez (format păstrat)...
📘 Stăpânirea documentelor: Pagini împărțite / Fuzionați documente / Exportați selecția în diferite formate (PDF/TXT/DOC/HTML...) / Conversie lot în PDF...
✏ Editarea continutului: Găsiți și înlocuiți în loturi în mai multe fișiere / Redimensionați toate imaginile / Transpuneți rânduri și coloane de tabel / Convertiți tabelul în text...
🧹 Curățare fără efort: Îndepărtați Spații suplimentare / Secțiuni pauze / Casete text / hiperlinkuri / Pentru mai multe instrumente de îndepărtare, mergeți la Elimină grup...
➕ Inserții creative: Inserați Mii de separatori / Casete de bifare / Butoane radio / QR Code / coduri de bare / Imagini multiple / Descoperiți mai multe în Insera grup...
???? Selectii de precizie: Repera cu precizie Pagini specifice / Mese / Forme / Paragrafe de titlu / Îmbunătățiți navigarea cu mai mult Selectați caracteristici...
⭐ Îmbunătățiri de stele: Navigați la orice locație / Inserarea automată a textului repetitiv / Comutați între ferestrele documentelor / 11 Convertire Instrumente...
Cele mai bune instrumente de productivitate de birou
Kutools pentru Cuvânt - Peste 100 de instrumente pentru Word
- 🤖 Caracteristici Kutools AI: Genera, Rescrie, Rezuma, Traduceți Documente / Obțineți răspunsuri rapide / Document polonez (format păstrat)
- 📘 Stăpânirea documentelor: Pagini împărțite / Fuzionați documente / Conversie lot în PDF
- ✏ Editarea continutului: Găsiți și înlocuiți în lot / Redimensionați toate imaginile
- 🧹 Curățare fără efort: Eliminați spațiile suplimentare / Eliminați secțiunile de secțiune
- ➕ Inserții creative: Introduceți o mie de separatoare / Introduceți casete de selectare / Creați coduri QR