Salt la conținutul principal

Cum se selectează toate tabelele din documentul Word?

Este ușor să selectați un tabel în Word făcând clic pe simbol-select-tabel-punct din colțul din stânga sus al tabelului, așa cum se arată în imaginea de mai jos. De asemenea, puteți selecta un tabel cu funcția Selectare tabel. Cu toate acestea, există vreo modalitate de a selecta rapid toate tabelele simultan în documentul Word? Metodele din acest articol vă vor ajuta să treceți prin el. 


Selectați toate tabelele din Word cu cod VBA

Selectați cu ușurință toate tabelele din Word cu Kutools pentru Word


Selectați toate tabelele din Word cu cod VBA

1. presa Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicație fereastră.

2. În deschidere Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module, Apoi copiați și lipiți următorul cod VBA în fereastra Module;

Cod VBA: Selectați toate tabelele din documentul curent:

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. apasă pe F5 tasta pentru a rula codul

Apoi toate tabelele sunt selectate imediat în documentul curent.


Selectați cu ușurință toate tabelele din Word cu Kutools pentru Word

În comparație cu utilizarea unui cod VBA pentru a selecta toate tabelele dintr-un document, Kutools pentru Word Selectați Tabelele utilitatea este destul de la îndemână. Puteți utiliza această caracteristică pentru a selecta tabele dintr-o selecție sau întregul document. Vă rugăm să faceți următoarele:

Kutools pentru Cuvânt : Cu mai mult de 100 de suplimente Word la îndemână, liber să încercați fără limitări 60 zile.

Clic Kutools > Mese > Selectați Tabelele. Vedeți captura de ecran:

notițe: Pentru selectarea tabelelor în selecție, trebuie să selectați mai întâi intervalul și apoi să aplicați caracteristica.

Apoi, puteți vedea rezultatele după cum urmează.

Selectați tabele din selecție:

Selectați tabele din întregul document:

Dacă doriți să aveți o încercare gratuită a acestui utilitar, vă rugăm să accesați descărcați gratuit software-ul mai întâi, apoi mergeți pentru a aplica operația conform pașilor de mai sus.


Demo: Selectați cu ușurință toate tabelele din Word cu Kutools pentru Word


Cele mai bune instrumente de productivitate de birou

Kutools pentru Cuvânt - Crește-ți experiența Word cu Over 100 Caracteristici remarcabile!

🤖 Asistent AI Kutools: Transformă-ți scrisul cu AI - Generați conținut  /  Rescrie textul  /  Rezumat documente  /  Solicitați informații pe baza Documentului, toate în Cuvânt

📘 Stăpânirea documentelor: Pagini împărțite  /  Fuzionați documente  /  Exportați selecția în diferite formate (PDF/TXT/DOC/HTML...)  /  Conversie lot în PDF  /  Exportați paginile ca imagini  /  Imprimați mai multe fișiere simultan...

Editarea continutului: Găsiți și înlocuiți în lot peste mai multe fișiere  /  Redimensionați toate imaginile  /  Transpuneți rânduri și coloane de tabel  /  Convertiți tabelul în text...

🧹 Curățare fără efort: Îndepărtați Spații suplimentare  /  Secțiuni pauze  /  Toate anteturile  /  Casete text  /  hiperlinkuri  / Pentru mai multe instrumente de îndepărtare, mergeți la nostru Eliminați grupul...

Inserții creative: Inserați Mii de separatori  /  Casete de bifare  /  Butoane radio  /  QR Code  /  coduri de bare  /  Tabel cu linii diagonale  /  Legenda ecuației  /  Image Caption  /  Legenda tabelului  /  Imagini multiple  / Descoperiți mai multe în Inserați grupul...

???? Selectii de precizie: Repera cu precizie pagini specifice  /  tabele  /  forme  /  paragrafele de titlu  / Îmbunătățiți navigarea cu mai mult Selectați caracteristici...

Îmbunătățiri de stele: Navigați rapid în orice locație  /  inserarea automată a textului repetitiv  /  comutați fără probleme între ferestrele documentelor  /  11 Instrumente de conversie...

???? Vrei să încerci aceste funcții? Kutools pentru Word oferă a 60-zi de încercare gratuită, fără limitări! 🚀
 
Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Very nice method. Thank you
This comment was minimized by the moderator on the site
It seeems that this macros does not work in Word 2016
This comment was minimized by the moderator on the site
It works in Word 2016. What error are you getting?
This comment was minimized by the moderator on the site
I understand already. For correct work macros cursor must to be not in table when you call macros. Thank you.
This comment was minimized by the moderator on the site
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?
This comment was minimized by the moderator on the site
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
This comment was minimized by the moderator on the site
Wonderful I got the solution by using the VBA code. Thank you so much
This comment was minimized by the moderator on the site
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!
This comment was minimized by the moderator on the site
excellent macro and very easy
This comment was minimized by the moderator on the site
thank you so much he is good program but after few days stopped and require password and user name
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations