Reja: kirish asosiy qism microsoft Word dasturi va imkoniyatlari

Новое 
сочетание клавиш:
bo`limiga kerakli Klavishlar birikmasi misol uchun Ctrl+@ 
tugmasini tanlaymiz va
Назначить
tugmasini bosib oxiri
Закрить
ni bosamiz. 
U quyidagi 4-2-rasmda ko`rsatilgan.

---

49 
4-2-rasm
Izoh: Klavishlar birikmasi tanlangandan so`ng 
Назначить 
tugmasini bosish 
shart. 
Endi asosiy vazifani kirilldan lotinga o`tkazishni boshlaymiz. Buning uchun 
CTRL+H tugmasi yoki 
Главная 
menyusidan 
заменить
tugmasini bosish orqali 
Найти и заменить 
oynasi ochiladi. Bu oynadagi 
Найти 
bo`limiga Kirill 
alfavitidan “a” ni yozib, 
заменить на 
bo`limiga
 
Lotin alfavitidan “a” yozib 
заменить все 
tugmasini bosamiz. Shu tariqa barcha harflarni tartib bilan ketma-
ket almashtirib chiqamiz. Microsoft Visual Basic for Applications oynasida “a” 
harfini almashtirish kodi quyidagicha bo`ladi: 
Sub Kirilldan–Lotinga() 
' 
' Kirilldan–Lotinga макрос 
' 

---

50 
' 
Selection.Find.ClearFormatting 
Selection.Find.Replacement.ClearFormatting 
With Selection.Find 
.Text = "a" 
.Replacement.Text = "а" 
.Forward = True 
.Wrap = wdFindContinue 
.Format = False 
.MatchCase = False 
.MatchWholeWord = False 
.MatchWildcards = False 
.MatchSoundsLike = False 
.MatchAllWordForms = False 
End With 
Selection.Find.Execute Replace:=wdReplaceAll 
With Selection.Find 
.Text = "ю" 
.Replacement.Text = "yu" 
.Forward = True 
.Wrap = wdFindContinue 
.Format = False 
.MatchCase = False 
.MatchWholeWord = False 
.MatchWildcards = False 
.MatchSoundsLike = False 
.MatchAllWordForms = False 
End With 
Izoh: Imkon qadar juft harflarni avval almashtirib olish kerak shunda hatoliklar 
kam bo`ladi. 

---

51 
Barcha harflarni almashtirgach makros yozishni to`xtatish uchun menyular satridan