İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Word sənədində sözləri sözlərə çevirmək üçün necə?

Bu yazı, Word sənədində İngilis dili sözcüklərə çevrilmə üsulundan bəhs edir, maraqlandığınız təqdirdə ətraflı məlumatı nəzərdən keçirin.

VBA ilə ingilis sözlərinə çevirmək

Asanlıqla bir sözü birdən çox sənədə ayırın

Ümumiyyətlə, bir Word sənədini bir-birinə ayırmaq üçün surəti və yapışdırıb istifadə edin, ancaq Split Documentnet proqramı, iş effektivliyini artıracaq səhifəyə, başlıq1, səhifə break və ya bölüm sonlarına əsaslanan bir Word sənədini bölüşdürə bilər. 45 gün pulsuz sınaq üçün tıklayın!
səhifəyə görə reklam split sənədləri
Word üçün Kutools: yüzlərlə lazımlı Word eklentisi ilə, heç bir məhdudiyyət olmadan 45 gündə cəhd edin.

VBA ilə ingilis sözlərinə çevirmək

1. Sözlərə çevirmək istədiyiniz nömrəni seçin, basın Alt + F11 açmaq üçün açarlar Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > Modules, və kodları aşağıda kopyalayın və onları yapışdırıb Modules scripts.

VBA: sözü sözlərə çevirmək

Sub ConvertNumberToWord () 'UpdatebyExtendoffice20181010 Dim xDigit ikiqat Dim xBuff kimi Dəyişən Düsturu Xətdə Növbəti Selection.MoveLeft wdWord, 1, wdMove Selection.MoveRight wdWord, 1, wdExtend xDigit = Val (Trim (Selection.Text)) Əgər xDigit = 0 Və Sonra xDigit> 999999 Sonra xDigit <= 999999999 Sonra xBuff = Trim (Int (Str (xDigit / 1000000))) Selection.Fields.Add Selection.Range, wdFieldEmpty (Seçim.Text) "xD" = "xBuff +" \ "CardText", True Selection.MoveLeft wdWord, 1, wdExtend xBuff = Selection.Text və "million" xDigit = Sağ (Str (xDigit), 6) End if End If xDigit <= 999999 Sonra Selection.Fields.Add Selection.Range, wdFieldEmpty, "=" + Str (xDigit) + "\ CardText", True Selection.MoveLeft wdWord, 1, wdExtend xDigit = xBuff & Selection.Text Selection.TypeText xDigit + " "Else MsgBox" Sayı çox böyük ", vbOKOnly," Word üçün Kutool "End If End Sub

3. Basın F5 kodu açmaq üçün açar, indi nömrənin sözlərinə çevrildi.
doc sayı 1 sözünə

Qeyd: Kod yalnız bir dəfə hər dəfə işləyir.


10-un Kəşfini Firefox, Chrome, İnternet kimi bir çox Word sənədini / Excel iş kitabını gözdən keçirin və redaktə edin!

Firefox / Chrome / IE-də birdən çox veb səhifəni keçirmək üçün tanış ola bilərsiniz və asanlıqla müvafiq sekmeleri asanlıqla tıklayaraq onların arasında keçid edə bilərsiniz. Burada, Office Tab birbaşa Word pəncərəsində və ya Excel pəncərəsində birdən çox Word sənədinə və ya Excel kitablarına göz atmanıza imkan verən oxşar işlənməni dəstəkləyir və onların sekmelerini tıklayarak asanlıqla keçid edə bilərsiniz.
Ofis Sekmesinin pulsuz sınaq üçün basın!

Firefox kimi bir pəncərədə birdən çox söz sənədinə göz atın


Word üçün Kutools

100, 2003, 2007, 2010, 2013 və 2016 üçün 2019 Ətraflı funksiyaları

shot-kutools-700-225-kte

Daha çox xüsusiyyətlər | Pulsuz Yüklə | Yüzlərlə funksiya üçün yalnız $ 39.00

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.