Megjegyzés: A webhely többi nyelvét a Google fordítja. Vissza az angol nyelvre
Belépek  \/ 
x
or
x
Regisztráció  \/ 
x

or

Hogyan válasszuk ki az összes táblázatot a Word dokumentumban?

A táblára kattintva könnyen kiválasztható a Word dot-select-table-symbol gomb az asztal bal felső sarkában, az alábbi képernyőképen. Táblát is kiválaszthat a Tábla kiválasztása funkcióval. Van-e azonban valamilyen módszer az összes táblázat gyors kiválasztására a Word dokumentumban? Az ebben a cikkben szereplő módszerek segítenek átjutni rajta. 


Válassza ki az összes táblázatot a Wordben VBA kóddal

Könnyen kiválaszthatja az összes táblázatot a Wordben a Kutools for Word segítségével


Válassza ki az összes táblázatot a Wordben VBA kóddal

1. nyomja meg más + F11 billentyűk megnyitásához Microsoft Visual Basic for Application ablak.

2. A megnyitón Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok, Ezután másolja és illessze be a következő VBA kódot a Modul ablakba;

VBA kód: Jelölje ki az összes dokumentumot az aktuális dokumentumban:

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. megnyomni a F5 gombot a kód futtatásához

Ezután azonnal kiválasztja az összes táblázatot az aktuális dokumentumban.


Könnyen kiválaszthatja az összes táblázatot a Wordben a Kutools for Word segítségével

Összehasonlítva a VBA kód használatával a dokumentum összes táblájának kiválasztásához, a Kutools for Word's Válassza a Táblák lehetőséget hasznosság elég praktikus. Ezzel a szolgáltatással kiválaszthatja a kijelölés tábláit vagy a teljes dokumentumot. Kérjük, tegye a következőket:

Kutools for Word : Több mint 100 praktikus Word-bővítménnyel, szabadon kipróbálható korlátozás nélkül 60 nap alatt.

Kattints Kutools > Asztalok > Válassza a Táblák lehetőséget. Lásd a képernyőképet:

Megjegyzések: A kiválasztott táblák kiválasztásához először ki kell választania a tartományt, majd alkalmazni kell a funkciót.

Ezután az alábbiak szerint láthatja az eredményeket.

Válasszon táblázatokat a kiválasztásból:

Táblázatok kiválasztása az egész dokumentumban:

Ha szeretné ingyenesen kipróbálni ezt a segédprogramot, kérjük, látogasson el ide: ingyenesen letölthető a szoftver először, majd lépjen a művelet végrehajtására a fenti lépések szerint.


Bemutató: Könnyen kiválaszthatja az összes táblázatot a Wordben a Kutools for Word segítségével




Ajánlott Word-termelékenységi eszközök

 

Kutools for Word - Több mint 100 speciális szolgáltatás a Word számára, takarítson meg 50% időt

  • A bonyolult és ismételt műveletek másodpercek alatt egyszeri feldolgozást végezhetnek.
  • Egyszerre több képet illesszen be a mappákba a Word dokumentumba.
  • Egyesítsen és egyesítsen több Word-fájlt a mappák között a kívánt sorrenddel.
  • Bontja az aktuális dokumentumot külön dokumentumokká címsor, szakasz törés vagy egyéb szempontok szerint.
  • Fájlok konvertálása a Doc és a Docx, a Docx és a PDF között, a közös konverzióhoz és kiválasztáshoz szükséges eszközök gyűjteménye stb.

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