3 Useful Methods to Batch Clear All Table Styles in Your Word Document

In this article, we will focus on demonstrating you 3 useful methods to batch clear all table styles in your Word document.

Every once in a while, if a Word table is applied with an undesired style or it reduces the visual effect of the entire document, you need to clear its style. Now let’s show you how to accomplish such a task.

Method 1: Clear the Style of One Word Table

1. First and foremost, move cursor over the target table until you see the cross sign on the upper left corner of the table.
2. Next click on the cross sign to select the entire table.
3. Now you have triggered the “Table Tools”. Click “Design” tab.
4. Then click on the “More” button in “Table Styles” group to show the drop-down menu.
5. Choose the “Clear” option.Click "Clear"" src="data:image/svg+xml,%3Csvg%20xmlns='http://www.w3.org/2000/svg'%20viewBox='0%200%20636%20594'%3E%3C/svg%3E" alt="Select Table->Click "Design"->Click "Clear"" width="636" height="594" data-lazy-srcset="//www.circareview.com/blogs/wp-content/uploads/2017/07/Select-Table-then-Click-Design-then-Click-Clear.jpg 636w, //www.circareview.com/blogs/wp-content/uploads/2017/07/Select-Table-then-Click-Design-then-Click-Clear-300x280.jpg 300w, //www.circareview.com/blogs/wp-content/uploads/2017/07/Select-Table-then-Click-Design-then-Click-Clear-500x467.jpg 500w" data-lazy-sizes="(max-width: 636px) 100vw, 636px" data-lazy-src="//www.circareview.com/blogs/wp-content/uploads/2017/07/Select-Table-then-Click-Design-then-Click-Clear.jpg">
6. Now the table style is removed. So are all table borders. To add borders to table, make sure the table is selected. And click on the drop-down button next to “Borders” command.
7. And choose “All Borders”.Choose "All Borders"" src="data:image/svg+xml,%3Csvg%20xmlns='http://www.w3.org/2000/svg'%20viewBox='0%200%20693%20447'%3E%3C/svg%3E" alt="Click on Drop-down Button Next to "Borders" Command->Choose "All Borders"" width="693" height="447" data-lazy-srcset="//www.circareview.com/blogs/wp-content/uploads/2017/07/Click-on-Drop-down-Button-Next-to-Borders-Command-then-Choose-All-Borders.jpg 693w, //www.circareview.com/blogs/wp-content/uploads/2017/07/Click-on-Drop-down-Button-Next-to-Borders-Command-then-Choose-All-Borders-300x194.jpg 300w, //www.circareview.com/blogs/wp-content/uploads/2017/07/Click-on-Drop-down-Button-Next-to-Borders-Command-then-Choose-All-Borders-500x323.jpg 500w" data-lazy-sizes="(max-width: 693px) 100vw, 693px" data-lazy-src="//www.circareview.com/blogs/wp-content/uploads/2017/07/Click-on-Drop-down-Button-Next-to-Borders-Command-then-Choose-All-Borders.jpg">

Here is the outcome:

方法2:批量清除所有在一个Docu表样式ment

Once we have done the single table, the topic of batch processing cannot be missed. First, let’s see how to clear all table styles in a document via VBA.

1. To start with, press “Alt+ F11” to show the VBA editor in Word.
2. Next click on the “Normal” project on the left column.
3. Then click the “Insert” on the menu bar.
4. And choose “Module” on the drop-down menu.Click "Insert"->Click "Module"" src="data:image/svg+xml,%3Csvg%20xmlns='http://www.w3.org/2000/svg'%20viewBox='0%200%20266%20185'%3E%3C/svg%3E" alt="Click "Normal"->Click "Insert"->Click "Module"" width="266" height="185" data-lazy-src="//www.circareview.com/blogs/wp-content/uploads/2017/07/Click-Normal-then-Click-Insert-then-Click-Module-29.jpg">
5. Open the module’s coding space by double clicking on it.
6. Now paste the following macro there:

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. Finally click “Run”.

This macro clears all table styles in a document, applies “Table Normal” style to them, and adds table borders as well.

Method 3: Batch Clear All Table Styles in Multiple Documents

Now in case you have a couple of document to deal with, here is the macro to clear all table styles in multiple documents.

1. Firstly, arrange all documents in one folder.
2. The repeat steps in method 2 to install and run a macro.
3. Only this time, remember to replace with this macro:

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. Running the macro, there will be the “Browse” window. Select the folder you store document in step 1 and click “OK”.

宏然后把剩下的工作。

Ways to Regain Lost Documents

By lost documents, we mean the documents get compromised due toWord corruptionor human errors. While dealing with such documents, you should always keep in mind that they can be retrieved with the help of some advanced repairing tool.

Author Introduction:

Vera Chen is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, includingrepair xlsand pdf repair software products. For more information visitwww.circareview.com