4 Schnelle Methoden zum Entfernen unerwünschter Frames in Ihrem Word-Dokument

In diesem postWir zeigen Ihnen 4 schnelle Möglichkeiten, um unerwünschte Frames in Ihrem Word-Dokument zu entfernen.

Bis zu einem gewissen Grad müssen Frames wie Textfelder sein, die beide zum Speichern von Texten in einem Dokument verwendet werden. Frames haben jedoch einige Vorteile gegenüber Textfeldern. Zum Beispiel kann es einige Felder enthalten und Sie können start Fußnoten oder Endnoten im Inneren, die beide in Textfeldern funktionieren.   

Trotzdem können wir die Notwendigkeit, Frames zu entfernen, die Sie einfach nicht mehr möchten, nicht ignorieren. Daher bieten wir Ihnen 4 einfache, aber schnelle Möglichkeiten wie folgt:

Methode 1: Rahmen manuell entfernen

1. Klicken Sie zunächst mit der rechten Maustaste auf einen Rahmenrahmen.
2. Wählen Sie dann im Kontextmenü „Rahmen formatieren“.
3. Klicken Sie anschließend im geöffneten Feld "Frame" auf die Registerkarte "Frame entfernen".

Methode 2: Entfernen Sie alle Frames in einer Auswahl

Wie Sie sehen, ist es mühsam, mehrere Frames nacheinander mit den Schritten in Methode 1 zu entfernen. Um Zeit zu sparen, sollten Sie die VBA-Codes schneller verwenden.

1. Treffen Sie zunächst eine Auswahl über eine Reihe von Texten, die Frames enthalten.
2. Zweitens drücken Sie "Alt + F11", um den VBA-Editor zu öffnen.
3. Klicken Sie anschließend auf "Normal" und dann auf "Einfügen".
4. Wählen Sie im Dropdown-Menü "Modul".
5. Öffnen Sie das Modul durch Doppelklick und fügen Sie dort folgende Codes ein:

Sub RemoveAllFramesInSelection()
  Dim objFrame As frame
  Dim nFrame As Long
 
  Application.ScreenUpdating = False
 
  nFrame = Selection.Frames.Count
 
  For Each objFrame In Selection.Frames
    objFrame.Delete
  Next objFrame
  MsgBox ("All " & nFrame & " frames in this selection have been removed!")
 
  Application.ScreenUpdating = True
End Sub

6. Klicken Sie abschließend auf die Schaltfläche "Ausführen" oder drücken Sie "F5", um Codes auszuführen.

Sie erhalten ein Meldungsfeld mit dem Ergebnis, z. B.:

Methode 3: Entfernen Sie alle Frames im aktuellen Dokument

Dennoch benötigen wir ein Makro, um die Stapelverarbeitung durchzuführen.

1. Installieren Sie ein Makro und führen Sie es mit den Schritten in Methode 2 aus.
2. Ersetzen Sie dann dieses Makro durch dieses:

Sub RemoveAllFramesInDoc()
  Dim objFrame As frame
  Dim nFrame As Long
 
  Application.ScreenUpdating = False
 
  nFrame = ActiveDocument.Frames.Count
 
  For Each objFrame In ActiveDocument.Frames
    objFrame.Delete
  Next objFrame
  MsgBox ("All " & nFrame & " frames in this document have been removed!")
 
  Application.ScreenUpdating = True
End Sub

Ebenso werden Sie nach Abschluss des Vorgangs mit einem Meldungsfeld benachrichtigt.

Methode 4: Entfernen Sie alle Frames in mehreren Dokumenten aus einem Ordner

Wenn Sie über einen Stapel von Dokumenten verfügen, die alle Frames enthalten, stellen wir Ihnen auch ein Makro zur Verfügung, um die Aufgabe zu erledigen.

1. Fügen Sie diese Codes in das VBA-Modul ein und führen Sie sie aus:

Sub RemoveAllFramesInAllDocsInFolder()
  Dim objDoc As Document
  Dim dlgFile As FileDialog
  Dim nFile As Integer
  Dim objFrame As frame
  Dim nFrame As Long
 
  Set dlgFile = Application.FileDialog(msoFileDialogFilePicker)
 
  With dlgFile
    dlgFile.AllowMultiSelect = True
    If .Show = -1 Then
      For nFile = 1 To dlgFile.SelectedItems.Count
        Documents.Open dlgFile.SelectedItems(nFile)
        Set objDoc = ActiveDocument
 
        nFrame = ActiveDocument.Frames.Count
        For Each objFrame In ActiveDocument.Frames
          objFrame.Delete
        Next objFrame
        objDoc.Save
        objDoc.Close
      Next nFile
    Else
      MsgBox "No file is selected! Please select a target file."
      Exit Sub
    End If
  End With
End Sub

2. Jetzt werden Sie das Fenster "Durchsuchen" auslösen. Wählen tarHolen Sie sich Dokumente und klicken Sie auf "Öffnen". In Sekundenschnelle werden dann alle Frames in ausgewählten Dokumenten entfernt.

Datenkatastrophe überwinden

Es ist unnötig zu erwähnen, dass eine Datenkatastrophe keineswegs schrecklich ist. In gewissem Maße kann es sogar eine berufliche Bedrohung sein. Daher ist es von entscheidender Bedeutung, Daten zu schützen und zu wissen, welche Maßnahmen nach einem Datenverlust ergriffen werden müssen. Eine der empfehlenswerten Maßnahmen ist es, a docx beheben Werkzeug im Voraus.

Einführung des Autors:

Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich xlsx beheben , pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX