Үгийн баримт бичигт хэсгийн зөрчлийг өөрчлөх 2 хурдан арга

Энэ нийтлэлд Word програмын хэсгийн завсарлагааны төрлийг өөрчлөх 2 хурдан арга байна.

Word дээр хамгийн их ашиглагддаг хэсэг завсарлагааны төрлүүд нь “Дараагийн хуудас” болон “Үргэлжилсэн” юм. Эхнийхийг нь оруулах нь шинэ хэсэгт шинэ хуудас эхлүүлэх гэсэн үг юм. Энэ нь хэсгүүдийг тодорхой харагдацаар хуваадаг. Гэхдээ хэвлэхэд цаас гаргаж авах шаардлагатай болно. Мэдээжийн хэрэг, энэ нь байгаль орчинд ээлтэй арга биш юм. Дараа нь та олон цаас хэмнэх боломжтой боловч тусгаарлах шаардлагыг хангахад сайн биш байж болох “Үргэлжилсэн” завсарлагыг ашиглах талаар бодож үзээрэй.

Тиймээс бид тодорхой шаардлагын дагуу сонгох арга замыг танилцуулахыг хүсч байна.

Арга 1: Хуудасны тохиргоог өөрчлөх

1. Юуны өмнө, курсороо зорилтот хэсэгт байрлуулж, тууз дээрх "Хуудасны зохион байгуулалт" таб дээр дарна уу.
2. Дараа нь ижил нэртэй харилцах цонхыг нээхийн тулд "Хуудасны тохиргоо" бүлгийн сумны товчийг дарна уу.
3. Дараа нь нүдэнд байгаа "Layout" табыг дарна уу.
4. Мөн "Хэсгийн эхлэл" цэсний цэснээс хүссэн хэсгийн завсарлагааны төрлийг сонгоно уу.
5. Дараа нь "Apply to" комбайны хайрцагт програмын мужийг сонгоно уу. Та ганц секцийн завсарлагааны төрлийг өөрчлөх боломжтой. 

Үр дүн энд байна:

Арга 2: Баримтын бүх хэсгийн зөрчлийн төрлийг өөрчлөхийн тулд Word макро ажиллуулна уу

1. Эхлээд Word дээр VBA засварлагчийг ажиллуулахын тулд "Alt" + "F11" товчийг дарна уу.
2. Дараа нь "Хэвийн" төслийг дараад цэсний мөрөнд "Оруулах" таб дээр дарна уу.
3. Дараа нь унах цэснээс "Модуль" -г сонгоно уу.
4. Дараа нь шинэ модуль дээр давхар товшоод нээнэ үү.
5. Одоо засах зайд эдгээр кодыг буулгахад л хангалттай:

Sub ChangeNextPageBreakToContinuous()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionNewPage Then
        .SectionStart = wdSectionContinuous
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

6. Макро ажиллуулахын тулд “F5” дээр дарна уу.

Энэхүү макро нь "Дараагийн хуудас" төрлийн бүх хэсгийн завсарлагыг "Үргэлжилсэн" болгон өөрчилнө. Үр дүн нь 1-р аргын үр дүнтэй ижил байна.

Хэрэв та тасралтгүй хэсгийн бүх завсарлагыг "Дараагийн хуудас" хэлбэрт шилжүүлэх шаардлагатай бол дараахь макро ашиглана уу.

Sub ChangeContinuousBreakToNextPageBreak()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionContinuous Then
        .SectionStart = wdSectionNewPage
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

Баримт бичгийг засах хэрэгсэл

Энэ нь Word-ийн асуудлуудтай тулгараад дуусах магадлал багатай юм гэмтсэн docx. Тиймээс та яаралтай арга хэмжээ авах ёстой. Өгөгдлийг сэргээх хамгийн хурдан арга бол чадварлаг засварлах хэрэгслийг сонгох явдал юм.

Зохиогчийн танилцуулга:

Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. xls засах болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com