Ushbu maqolada biz sizga Word hujjatidagi avtomatik raqamlashni oddiy matnlarga aylantirishning 2 usulini ko'rsatmoqchimiz.
Umuman olganda, biz Word-dagi AutoNumber xususiyatidan juda ko'p foyda olamiz. Bu bizni elementlarni ro'yxatga olish va paragraflarni tartibga solishda ko'p muammolardan xalos qiladi. Biroq, bu erda burilish bor. Hujjat odatda bir necha marta qayta ko'rib chiqishni talab qiladi. Matnlarni qo'shish va o'chirish jarayonida raqamlarga ta'sir qiladi. Shuning uchun biz ushbu "dinamik" raqamlarni oddiy matnlarga aylantirishimiz kerak. Shunday qilib, biz hujjat formatlashni himoya qila olamiz.
Quyida sizga kerak bo'ladigan 2 ta usul mavjud. Va sinab ko'rishdan oldin, avval faylingizning zaxira nusxasini olishingizni tavsiya qilamiz. Agar siz matnni oddiy matnga aylantirganingizdan so'ng uni avtomatik raqamlashingiz kerak bo'lsa, har doim zaxira nusxasini olishingiz mumkin.
1-usul: Faqat matnni saqlang
- Avvalo, avtomatik raqamlashni o'z ichiga olgan matnni tanlang.
- Keyin o'ng tugmasini bosing.
- Keyin ro'yxat menyusida "Nusxa olish" ni tanlang.
- Endi asl matnni o'chirish uchun "O'chirish" tugmasini bosing.
- Va yana maydonni o'ng tugmasini bosing.
- Bu safar "Qo'yish parametrlari" ostida "Faqat matnni saqlash" ni tanlang.
Endi siz avtomatik raqamlashni statik raqamlarga muvaffaqiyatli aylantirdingiz. Quyida misol keltirilgan:
Hujjat formatlash aslida biroz o'zgarganini allaqachon sezishingiz mumkin. Hujjatingizda faqat bir nechta raqam bo'lsa va u formatlash standartlarini talab qilmaydi, siz ushbu usuldan xavfsiz foydalanishingiz mumkin. Biroq, agar hujjatingizda ko'p darajali ro'yxatlar bo'lsa, siz ushbu operatsiyalarni bir necha marta takrorlashingiz kerak bo'ladi.
Aslida, shuning uchun bizda ikkinchi usul mavjud, ya'ni VBA kodlaridan foydalanish.
2-usul: VBA kodlaridan foydalaning
- Birinchidan, lentada "Ishlab chiquvchi" yorlig'i mavjudligiga ishonch hosil qiling. Agar yo'q bo'lsa, iltimos, bizning oldingi maqolamizga qarang: Word hujjatingizga fon musiqasini qanday kiritish mumkin
- Ikkinchidan, "Tuzuvchi" yorlig'ini bosing.
- Uchinchidan, "Kod" guruhidagi "Visual Basic" ni bosing.
- Endi siz VBA muharririni ochdingiz. Chap tarafdagi ustunda hujjat nomining loyihasini toping. Keyin o'ng tarafdagi tahrirlash maydonini ochish uchun "ThisDocument" tugmasini ikki marta bosing.
- Keling, 2 xil holatni ko'rib chiqaylik. Birinchidan, agar siz faqat avtomatik raqamlashni o'zgartirmoqchi bo'lsangiz, quyidagi kodlarni nusxalash va joylashtirishingiz kerak:
Sub ConvertSelectAutoNumberToText() If ActiveDocument.Lists.Count > 0 Then Selection.Range.ListFormat.ConvertNumbersToText Else End If End Sub
Biroq, agar siz butun hujjatning yakuniy loyihasini tuzgan bo'lsangiz, barcha avtomatik raqamlashni oddiy matnga aylantirish uchun quyidagilarni olishingiz kerak:
Sub ConvertAllAutoNumberToText() If ActiveDocument.Lists.Count > 0 Then Dim lisAutoNumList As List For Each lisAutoNumList In ActiveDocument.Lists lisAutoNumlist.ConvertNumbersToText Next Else End If End Sub
- Nihoyat, ishni bajarish uchun "Ishga tushirish" tugmasini bosing.
Siz "dinamik" raqamlardan xalos bo'lish uchun VBA kodlaridan foydalanganda ko'rishingiz mumkin, siz hujjat formatini juda yaxshi saqlashingiz mumkin.
Zaxira nusxalariga fikr bering
Har doimgidek, biz fayllaringizning zaxira nusxalarini olishga katta ahamiyat beramiz. Fayllaringiz buzilganda ular muhim rol o'ynaganligi sababli, unga sarflagan vaqtingiz qaytarib berishi mumkin. Misollardan biri, a dan foydalanganda docx xatolarni tuzatish vositasi, har doim eng so'nggi ma'lumotlarga ega bo'lishingiz mumkin, bu sizning ishlamay qolish vaqtingizni sezilarli darajada qisqartirishi mumkin.
Muallif kirish:
Vera Chen - ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc xlsx ma'lumotlar xatosini tuzatish va pdf dasturiy mahsulotlarni ta'mirlash. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com