Үгсийн баримт бичигтээ бүх хүснэгт хэв маягийг багцаар нь арилгах 3 ашигтай арга

Энэ нийтлэлд бид таны Word баримт бичигт байгаа бүх хүснэгт хэв маягийг багцлан арилгах 3 ашигтай аргыг харуулах болно.

Хэрэв та хүснэгтийн дагуу хүснэгтийг Word хүснэгтэд ашигласан эсвэл бүхэл баримт бичгийн харааны нөлөөллийг бууруулж байвал та түүний хэв маягийг арилгах хэрэгтэй. Одоо ийм даалгаврыг хэрхэн биелүүлэхийг үзүүлье.

Арга 1: Нэг үгийн хүснэгтийн хэв маягийг арилгах

1. Юуны өмнө, хүснэгтийн зүүн дээд буланд загалмай тэмдэг гарч иртэл курсорыг зорилтот хүснэгтийн дээгүүр хөдөлгөнө үү.
2. Дараа нь хөндлөн тэмдэг дээр дарж хүснэгтийг бүхэлд нь сонгоно уу.
3. Одоо та "Хүснэгт хэрэгсэл" -ийг өдөөсөн болно. "Дизайн" таб дээр дарна уу.
4. Дараа нь "Хүснэгтийн хэв маяг" бүлгийн "Илүү" товчийг дарж, доош унах цэсийг харуулна уу.
5. "Clear" сонголтыг сонгоно уу.
6. Одоо ширээний хэв маягийг хасав. Хүснэгтийн бүх хүрээ мөн адил байна. Хүснэгтэд хүрээ нэмэхийн тулд хүснэгтийг сонгосон эсэхээ шалгаарай. Мөн "Хил хязгаар" командын хажууд байгаа унах товчийг дарна уу.
7. Мөн "Бүх хил хязгаар" -ыг сонгоно уу.

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

Арга 2: Хүснэгтийн бүх хэв маягийг багцаар нэг баримт бичигт цэвэрлэх

Нэг хүснэгтийг хийсний дараа багц боловсруулах сэдвийг орхигдуулж болохгүй. Нэгдүгээрт, VBA-ээр дамжуулан бүх хүснэгт хэв маягийг баримт бичигт хэрхэн арилгахыг үзье.

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

Sub ClearTableStylesInADoc()
  Dim objTable As Table
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objTable In objDoc.Tables
    objTable.Style = "Table Normal"
    objTable.Borders.Enable = True
  Next objTable
 
  Application.ScreenUpdating = True
 
  Set objDoc = Nothing
End Sub

7. Эцэст нь "Ажиллуулах" дээр дарна уу.

Энэхүү макро нь баримт бичгийн бүх хүснэгт хэв маягийг арилгаж, тэдэнд "Хүснэгт Хэвийн" хэв маягийг ашиглаж, хүснэгтийн хүрээг нэмж өгдөг.

Арга 3: Олон баримт бичигт бүх хүснэгтийн хэв маягийг багцаар арилгах

Хэрэв танд хэдэн баримт бичиг байгаа бол олон хүснэгтийн бүх хүснэгт хэв маягийг арилгах макро энд байна.

1. Нэгдүгээрт, бүх баримт бичгүүдийг нэг хавтсанд байрлуул.
2. Макро суулгах, ажиллуулах 2-р аргын давталтууд.
3. Зөвхөн энэ удаад энэ макрооор солихыг санаарай.

Sub ClearTableStylesInMultiDoc()
  Dim objTable As Table
  Dim objDoc As Document
  Dim StrFolder As String
  Dim strFile As String
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "Select a folder first."
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
    Set objDoc = ActiveDocument
 
    For Each objTable In objDoc.Tables
      objTable.Style = "Table Normal"
      objTable.Borders.Enable = True
    Next objTable
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. Макро ажиллуулахад "Browse" цонх гарч ирнэ. 1-р алхам дээр документ хадгалах фолдероо сонгоод "OK" дээр дарна уу.

Үлдсэн ажлаа дараа нь макро дээр үлдээгээрэй.

Алдагдсан баримт бичгийг сэргээх аргууд

Алдагдсан баримт бичиг гэдэг нь баримт бичгүүд дараах шалтгаанаар эвдэрсэн гэсэн үг юм. Үгийн авлига эсвэл хүний ​​алдаа. Ийм баримт бичигтэй харьцахдаа тэдгээрийг засварын зарим дэвшилтэт хэрэгслийн тусламжтайгаар гаргаж авах боломжтой гэдгийг үргэлж санаж байх хэрэгтэй.

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

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