Word Belgenizdeki Tüm Tablo Stillerini Toplu Olarak Temizlemek İçin 3 Yararlı Yöntem

Bu makalede, size Word belgenizdeki tüm tablo stillerini toplu olarak temizlemek için 3 kullanışlı yöntemi göstermeye odaklanacağız.

Arada bir, bir Word tablosu istenmeyen bir stille uygulanırsa veya tüm belgenin görsel etkisini azaltırsa, stilini temizlemeniz gerekir. Şimdi size böyle bir görevi nasıl başaracağınızı gösterelim.

Yöntem 1: Tek Sözcük Tablosunun Stilini Temizle

1. Öncelikle, hedef tablonun sol üst köşesinde çarpı işareti görünene kadar imleci tablonun üzerine getirin.
2. Daha sonra tüm tabloyu seçmek için çarpı işaretine tıklayın.
3. Artık “Tablo Araçları”nı tetiklediniz. “Tasarım” sekmesine tıklayın.
4. Ardından, açılır menüyü görüntülemek için “Tablo Stilleri” grubundaki “Diğer” düğmesine tıklayın.
5. “Temizle” seçeneğini seçin.
6. Şimdi tablo stili kaldırıldı. Tüm tablo kenarlıkları da öyle. Tabloya kenarlık eklemek için tablonun seçili olduğundan emin olun. Ve "Kenarlıklar" komutunun yanındaki açılır düğmeyi tıklayın.
7. Ve "Tüm Kenarlıklar" ı seçin.

İşte sonuç:

Yöntem 2: Tüm Tablo Stillerini Tek Bir Belgede Toplu Olarak Temizle

Tekli tabloyu yaptıktan sonra toplu işleme konusu gözden kaçmaz. İlk olarak, bir belgedeki tüm tablo stillerini VBA aracılığıyla nasıl temizleyeceğimizi görelim.

1. Öncelikle, Word'de VBA düzenleyicisini açmak için "Alt + F11" tuşlarına basın.
2. Ardından sol sütundaki “Normal” projeye tıklayın.
3. Ardından menü çubuğundaki "Ekle" düğmesini tıklayın.
4. Ve açılır menüden "Modül"ü seçin.
5. Modülün kodlama alanını çift tıklayarak açın.
6. Şimdi aşağıdaki makroyu oraya yapıştırın:

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. Sonunda "Çalıştır" ı tıklayın.

Bu makro, bir belgedeki tüm tablo stillerini temizler, bunlara "Tablo Normal" stilini uygular ve ayrıca tablo kenarlıkları ekler.

Yöntem 3: Birden Çok Belgedeki Tüm Tablo Stillerini Toplu Olarak Temizle

Şimdi, ilgilenmeniz gereken birkaç belge olması durumunda, birden çok belgedeki tüm tablo stillerini temizlemek için makro burada.

1. İlk olarak, tüm belgeleri bir klasörde düzenleyin.
2. Bir makro yüklemek ve çalıştırmak için yöntem 2'deki adımları tekrarlayın.
3. Sadece bu sefer, bu makro ile değiştirmeyi unutmayın:

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. Makro çalıştırıldığında, “Gözat” penceresi olacaktır. Adım 1'de belgeyi sakladığınız klasörü seçin ve "Tamam"a tıklayın.

O halde işin geri kalanını makroya bırakın.

Kaybolan Belgeleri Geri Almanın Yolları

Kaybolan belgelerden kastımız, belgelerin şu nedenlerle zarar görmesidir: Kelime bozulması veya insan hataları. Bu tür belgelerle uğraşırken, bazı gelişmiş onarım araçlarının yardımıyla geri alınabileceklerini her zaman aklınızda bulundurmalısınız.

Yazar Tanıtımı:

Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. onarım xls hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com