Note: The other languages of the website are Google-translated. Back to English
Iniciar sesión  \/ 
x
or
x
Regístrate  \/ 
x

or

¿Cómo seleccionar todas las tablas en un documento de Word?

Es fácil seleccionar una tabla en Word haciendo clic en el símbolo de tabla de selección de puntos en la esquina superior izquierda de la tabla como se muestra a continuación. También puede seleccionar una tabla con la función Seleccionar tabla. Sin embargo, ¿hay alguna forma de seleccionar rápidamente todas las tablas a la vez en un documento de Word? Los métodos de este artículo te ayudarán a superarlo. 


Seleccione todas las tablas en Word con código VBA

Seleccione fácilmente todas las tablas en Word con Kutools para Word


Seleccione todas las tablas en Word con código VBA

1. prensa otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En la apertura Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > MóduloLuego, copie y pegue el siguiente código VBA en la ventana del Módulo;

Código de VBA: seleccione todas las tablas en el documento actual:

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. presione el F5 clave para ejecutar el código

Luego, todas las tablas se seleccionan en el documento actual inmediatamente.


Seleccione fácilmente todas las tablas en Word con Kutools para Word

En comparación con el uso de un código VBA para seleccionar todas las tablas en un documento, Kutools para Word Seleccionar tablas la utilidad es bastante útil. Puede utilizar esta función para seleccionar tablas en una selección o en todo el documento. Haz lo siguiente:

Kutools for Word : Con más de 100 útiles complementos de Word, gratis para probar sin límite en 60 días.

Haz clic en Kutools > Mesas > Seleccionar tablas. Ver captura de pantalla:

<b>Nota</b>: Para seleccionar tablas en la selección, primero debe seleccionar el rango y luego aplicar la función.

Entonces puedes ver los resultados de la siguiente manera.

Seleccionar tablas en la selección:

Seleccione tablas en todo el documento:

Si desea tener una prueba gratuita de esta utilidad, vaya a descarga gratis el software primero, y luego vaya a aplicar la operación según los pasos anteriores.


Demostración: seleccione fácilmente todas las tablas en Word con Kutools para Word




Herramientas de productividad de palabras recomendadas

 

Kutools para Word: más de 100 funciones avanzadas para Word, ahorre su 50% de tiempo

  • Las operaciones complicadas y repetidas se pueden realizar un solo procesamiento en segundos.
  • Inserte varias imágenes en carpetas en un documento de Word a la vez.
  • Fusiona y combina varios archivos de Word en carpetas en uno con el orden que desees.
  • Divida el documento actual en documentos separados según el encabezado, el salto de sección u otros criterios.
  • Convierta archivos entre Doc y Docx, Docx y PDF, colección de herramientas para conversiones y selección comunes, etc.

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