Word hujjatingizga sahifa sonlarini tez kiritishning 5 ta usuli

Hozir ulashing:

Ushbu maqolada biz sizga Word hujjatiga sahifa tanaffuslarini tezda kiritishning 5 usulini taklif qilmoqchimiz.

Word-da qoralama tuzayotganda, siz kiritganingizda matningiz keyingi sahifaga o'tadi. Aslida, Word 2 sahifani ajratish uchun avtomatik sahifa tanaffusini qo'shgan. Bu faqat birinchi sahifa to'ldirilganda sodir bo'ladi. Ushbu maqola sizga turli sahifalardagi kontent bloklarini qo'yish uchun qo'lda sahifa tanaffusini qanday kiritishni ko'rsatib beradi. U ikkita sahifadagi matnlarni birlashtirishni to'xtatadi, hatto ulardan biriga kontent qo'shsangiz yoki o'chirsangiz ham.      Word hujjatingizga sahifa sonlarini kiriting

1-usul: Tasmaga buyruq bilan sahifa uzilishini joylashtiring

  1. Birinchidan, qo'shish ko'rsatkichini sahifa uzilishi ketadigan joyga qo'ying.
  2. Keyin lentada "Sahifa tartibi" ni bosing.
  3. Keyin "Breaks" tugmasini bosing.
  4. Va "Sahifa tanaffuslari" bo'limida "Sahifa" ni tanlang.

Sahifalar sonini ko'rish uchun "Uy" yorlig'i ostidagi "Ko'rsatish/Yashirish" buyrug'ini bosishingiz mumkin. Hujjatga sahifa uzilishi quyida keltirilgan:"Sahifa tartibi"-ni bosing->"Breaks"-ni bosing->"Sahifa"-ni bosing.

2-usul: Yorliq yordamida sahifalar uzilishini kiriting

  1. Xuddi shunday, kursorni to'g'ri qo'ying.
  2. Keyin "Ctrl + Enter" tugmasini bosing.

3-usul: Muayyan uslubga ega bo'lim oldidan sahifa uzilishini qo'ying

  1. Avvalo, "Uy" yorlig'i ostidagi "Uslublar" guruhidagi o'q tugmasini bosing.
  2. Ochilgan "Uslublar" oynasida uslubni o'ng tugmasini bosing.
  3. Keyin uning menyusida "O'zgartirish" ni tanlang."Uslublar" oynasini ochish uchun bosing -> Uslubni o'ng tugmasini bosing -> "O'zgartirish" ni tanlang
  4. "Uslubni o'zgartirish" oynasida "Format" yorlig'ini bosing.
  5. Keyin xuddi shu nom oynasini ochish uchun "Paragraf" tugmasini bosing.
  6. Keyin "Sahifa va qatorlar" yorlig'ini bosing.
  7. "Avval sahifalar uzilishi" katagiga belgi qo'ying va "OK" tugmasini bosing.
  8. Endi "Uslubni o'zgartirish" ga qayting va "OK" tugmasini bosing."Format"-ni bosing->"Paragraf"-ni bosing->"Qator va sahifalar oralig'i" yorlig'ini bosing->"Avvalgi sahifalar oralig'i" katagiga belgi qo'ying->Ikkala qutidagi "OK" tugmasini bosing.Muayyan uslubda bo'lim oldidan sahifa tanaffuslarini kiritish effekti

4-usul: Muayyan sahifaga sahifa parchasini qo'shing

Agar sizda uzun hujjat bo'lsa, maqsadli joyga yuqoriga va pastga aylantirmasdan, ma'lum bir sahifaga sahifa oxiri qo'shish uchun ushbu yondashuvdan foydalanishingiz mumkin.

  1. Avvalo, VBA muharririni ishga tushirish uchun "Alt + F11" tugmalarini bosing.
  2. Keyin "Oddiy" loyihani bosing va menyu panelidagi "Qo'shish" yorlig'ini bosing.
  3. Keyin "Modul" ni tanlang."Norma" ni bosing -> "Qo'shish" ni bosing -> "Modul" ni bosing
  4. Ikki marta bosish orqali yangi modulni oching va u erga quyidagi kodlarni joylashtiring:
Sub InsertPageBreakOnSpecificPage()
  Dim strPageNumber As String
  Dim nPageNumber As Integer
 
  Application.ScreenUpdating = False
 
  strPageNumber = InputBox("Enter a page number: ", "Page Number")
  nPageNumber = Int(strPageNumber)
 
  Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=nPageNumber
  ActiveDocument.Bookmarks("\page").Range.Select
  Selection.Collapse wdCollapseEnd
  Selection.InsertBreak Type:=wdPageBreak
 
  Application.ScreenUpdating = True
End Sub
  1. Endi "Ishga tushirish" tugmasini bosing yoki "F5" tugmasini bosing.Kodlarni joylashtirish -> "Ishga tushirish" tugmasini bosing
  2. Ochilgan kirish maydoniga sahifa raqamini kiriting va davom etish uchun "OK" tugmasini bosing.Sahifa raqamini kiriting-> "OK" tugmasini bosing

5-usul: Hujjatning har bir sahifasiga sahifani ajrating

Agar siz kitobni endigina tugatgan bo'lsangiz va matnning har bir bo'lagi joyida kerak bo'lsa, har bir sahifaga sahifa tanaffusini kiritish uchun ushbu usuldan foydalanishingiz mumkin.

  1. Makrosni o'rnatish va ishga tushirish uchun 4-usuldagi bosqichlarni bajaring.
  2. Makrosni shu bilan almashtirishni unutmang:
Sub InsertPageBreakOnEachPageInDoc()
  Dim objPageRange As Range
  Dim nTotalPageNumber As Integer
  Dim nPageNumber As Integer

  Application.ScreenUpdating = False
 
  nTotalPageNumber = ActiveDocument.ComputeStatistics(wdStatisticPages)

  For nPageNumber = nTotalPageNumber To 1 Step -1
    Set objPageRange = ActiveDocument.GoTo(wdGoToPage, wdGoToAbsolute, nPageNumber)
    objPageRange.InsertBreak WdBreakType.wdPageBreak
  Next nPageNumber
 
  Selection.HomeKey Unit:=wdStory
  Selection.TypeBackspace
  Selection.Delete
 
  Application.ScreenUpdating = True
End Sub

Ma'lumotlarni yo'qotish ta'sirini minimallashtirish

Ma'lumotlar yo'qolganda, bu bizga juda ko'p noqulayliklar keltirishi mumkin. Va ba'zida uning oqibati shunchalik dahshatliki, biznesda martaba paydo bo'lishi mumkin. Shuning uchun, minimallashtirish uchun So'zning shikastlanishi, yo'qolgan ma'lumotlarni tiklash uchun sizga malakali uchinchi tomon vositasi kerak bo'ladi.

Muallif kirish:

Vera Chen - ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc xlsx ta'mirlash va pdf dasturiy mahsulotlarni ta'mirlash. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com

Hozir ulashing:

Comments are closed.