Note: The other languages of the website are Google-translated. Back to English
Einloggen  \/ 
x
or
x
Registrieren  \/ 
x

or

Wie wähle ich alle Tabellen im Word-Dokument aus?

Es ist einfach, eine Tabelle in Word auszuwählen, indem Sie auf klicken Punktauswahl-Tabellensymbol Klicken Sie auf die Schaltfläche in der oberen linken Ecke der Tabelle (siehe Abbildung unten). Sie können eine Tabelle auch mit der Funktion Tabelle auswählen auswählen. Gibt es jedoch eine Möglichkeit, schnell alle Tabellen gleichzeitig in Word-Dokumenten auszuwählen? Die Methoden in diesem Artikel helfen Ihnen dabei. 


Wählen Sie alle Tabellen in Word mit VBA-Code aus
Wählen Sie mit Kutools for Word ganz einfach alle Tabellen in Word aus

Wählen Sie alle Tabellen in Word mit VBA-Code aus

1. Drücken Sie Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Anwendung Fenster.

2. In der Eröffnung Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > ModulKopieren Sie anschließend den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein.

VBA-Code: Wählen Sie alle Tabellen im aktuellen Dokument aus:

Sub selecttables()
Dim mytable As Table

For Each mytable In ActiveDocument.Tables
mytable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
End Sub

3. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes

Dann werden alle Tabellen im aktuellen Dokument sofort ausgewählt.

Wählen Sie mit Kutools for Word ganz einfach alle Tabellen in Word aus

Im Vergleich zur Verwendung eines VBA-Codes zum Auswählen aller Tabellen in einem Dokument, Kutools for Word's Wählen Sie Tabellen Dienstprogramm ist sehr praktisch. Mit dieser Funktion können Sie Tabellen in einer Auswahl oder im gesamten Dokument auswählen. Bitte gehen Sie wie folgt vor:

Kutools for Word : Mit mehr als 100 praktischen Word-Add-Ins, Kostenlos ohne Einschränkung in 60 Tagen zu versuchen.

Klicken Sie Kutools > Tische > Wählen Sie Tabellen. Siehe Screenshot:

Hinweis: Um Tabellen in der Auswahl auszuwählen, müssen Sie zuerst den Bereich auswählen und dann die Funktion anwenden.

Dann können Sie die Ergebnisse wie folgt sehen.

Tabellen in Auswahl auswählen:

Wählen Sie Tabellen im gesamten Dokument aus:

Wenn Sie dieses Dienstprogramm kostenlos testen möchten, gehen Sie zu Laden Sie die Software kostenlos herunter Wenden Sie zuerst die Operation gemäß den obigen Schritten an.

Demo: Mit Kutools for Word können Sie ganz einfach alle Tabellen in Word auswählen

Empfohlene Word-Produktivitätswerkzeuge

 

Kutools für Word - Mehr als 100 erweiterte Funktionen für Word, sparen Sie 50% Zeit

  • Komplizierte und wiederholte Vorgänge können in Sekunden einmalig verarbeitet werden.
  • Fügen Sie mehrere Bilder über Ordner hinweg gleichzeitig in ein Word-Dokument ein.
  • Führen Sie mehrere Word-Dateien in Ordnern zu einer gewünschten Reihenfolge zusammen.
  • Teilen Sie das aktuelle Dokument nach Überschrift, Abschnittswechsel oder anderen Kriterien in separate Dokumente auf.
  • Konvertieren Sie Dateien zwischen Doc und Docx, Docx und PDF, eine Sammlung von Tools für allgemeine Konvertierungen und Auswahl usw.
Weiterlesen Jetzt Herunterladen Kaufen Sie
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alex · 4 years ago
    It seeems that this macros does not work in Word 2016
    • To post as a guest, your comment is unpublished.
      Suril · 4 years ago
      It works in Word 2016. What error are you getting?
      • To post as a guest, your comment is unpublished.
        Alex · 4 years ago
        I understand already.
        For correct work macros cursor must to be not in table when you call macros.
        Thank you.
  • To post as a guest, your comment is unpublished.
    Iqbal · 4 years ago
    There are multiple tables in a document (about 200). I want to select all these tables only and paste them in a new document in the table format. When I select the tables as per above procedure then during paste operation it pastes them as text and not as table. Can you please help me?
  • To post as a guest, your comment is unpublished.
    Suril · 4 years ago
    The following modified code selects all tables, except tables having only one row:
    Sub SelAllTbls()
    ActiveDocument.DeleteAllEditableRanges (-1)
    Dim Tbl As Table
    For Each Tbl In ActiveDocument.Tables
    If Tbl.Rows.Count > 1 Then
    Tbl.Range.Editors.Add (-1)
    End If
    Next
    ActiveDocument.SelectAllEditableRanges (-1)
    ActiveDocument.DeleteAllEditableRanges (-1)
    End Sub

    The following code select only the header rows:
    Sub selallHeaders()
    On Error Resume Next
    ActiveDocument.DeleteAllEditableRanges (-1)
    Dim Tbl As Table
    For Each Tbl In ActiveDocument.Tables
    Tbl.Rows(1).Range.Editors.Add (-1)
    Next
    ActiveDocument.SelectAllEditableRanges (-1)
    ActiveDocument.DeleteAllEditableRanges (-1)
    End Sub

    I have many more such codes that select last rows, all bullets, small / long paras, etc. Watch my following video:
    https://www.youtube.com/watch?v=p_ZhufliFw8
  • To post as a guest, your comment is unpublished.
    Vinoth Murali · 4 years ago
    Wonderful I got the solution by using the VBA code. Thank you so much
  • To post as a guest, your comment is unpublished.
    JPF · 5 years ago
    Nifty code at first but it definitely corrupted a bunch of tables in Word 2010. Screwed up my file pretty good and had to revert back to an earlier version. Be wary!
  • To post as a guest, your comment is unpublished.
    rodrigo · 6 years ago
    excellent macro and very easy
  • To post as a guest, your comment is unpublished.
    refaat · 7 years ago
    thank you so much
    he is good program but after few days stopped and require password and user name