Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo cambiar el tamaño de todas / múltiples imágenes en Word?

Cuando copiamos o importamos imágenes desde Internet u otros archivos, el tamaño de las imágenes puede variar. Todo el mundo sabe cómo cambiar el tamaño de las imágenes una a una, pero si queremos redimensionarlas al mismo tamaño todas a la vez, ¿cómo podemos hacerlo? Este tutorial le mostrará varios métodos para cambiar el tamaño de las imágenes.

Cambiar el tamaño de las imágenes manualmente en Word

Cambiar el tamaño de las imágenes con VBA

Cambiar el tamaño de varias imágenes a la vez con Kutools para Word


Cambiar el tamaño de todas las imágenes al mismo tamaño en función de la seleccionada:

Para cambiar el tamaño de todas las imágenes en el mismo tamaño, debe redimensionarlas una por una normalmente, pero, con Kutools for Word's Cambiar el tamaño de las imágenes función, puede ajustar todas las imágenes con el mismo tamaño por una seleccionada en. Por otro lado, también puede cambiar su tamaño a un porcentaje específico según lo necesite.

doc ajustar imágenes 05

Kutools for Word: con más de 100 complementos de Word prácticos, de prueba sin límite en días 60. Haga clic para descargar y prueba gratuita ahora!


Cambiar el tamaño de las imágenes manualmente en Word

Caliente
¡Increíble! ¡Use las pestañas eficientes en Word (Office) como Chrome, Firefox y New Internet Explorer!

Leer más Descargar libre

1. Para mostrar los controladores de tamaño de la imagen haciendo clic en la imagen;

2. Coloque el cursor sobre uno de los controladores de tamaño de la imagen.

3. Arrastre el controlador de tamaño hasta que el tamaño de la imagen sea adecuado para sus necesidades. Ver captura de pantalla:

doc ajustar imágenes 1

Nota: Con este método, no puede cambiar el tamaño de varias imágenes a la vez. Debe cambiar el tamaño de uno por uno hasta que todas las imágenes cambian de tamaño.


Cambiar el tamaño de las imágenes con VBA

Con el siguiente código VBA, puede cambiar el tamaño de las imágenes a su tamaño ideal. Puedes hacerlo de la siguiente manera:

En este ejemplo, cambiamos el tamaño de la imagen a 1.78 pulgadas de alto y 3.17 pulgadas de ancho.

1. Seleccione una imagen que desee cambiar el tamaño;

2. prensa Alt + F11 para abrir el Microsoft Visual Basic para aplicaciones ventana;

3. Hacer clic Módulo Desde recuadro pestaña, copie y pegue el siguiente código VBA en el Módulo ventana;

Código de VBA: cambia el tamaño de una imagen a un tamaño específico:

Sub ResizePics()
Dim shp As Word.Shape
Dim ishp As Word.InlineShape
If Word.Selection.Type <> wdSelectionInlineShape And _
Word.Selection.Type <> wdSelectionShape Then
Exit Sub
End If
If Word.Selection.Type = wdSelectionInlineShape Then
Set ishp = Word.Selection.Range.InlineShapes(1)
ishp.LockAspectRatio = False
ishp.Height = InchesToPoints(1.78)
ishp.Width = InchesToPoints(3.17)
Else
If Word.Selection.Type = wdSelectionShape Then
Set shp = Word.Selection.ShapeRange(1)
shp.LockAspectRatio = False
shp.Height = InchesToPoints(1.78)
shp.Width = InchesToPoints(3.17)
End If
End If
End Sub

4. Haz click corrida botón o F5 tecla para ejecutar el código VBA, y la imagen seleccionada ha sido redimensionada a su tamaño de necesidad.

Nota: En el código anterior, En shp.Height = InchesToPoints (1.78) y shp.Width = InchesToPoints (3.17) son el alto y ancho de la imagen, puede cambiar el tamaño para satisfacer su necesidad.

Con este código VBA, tampoco puede cambiar el tamaño de todas o varias imágenes a la vez. Debe ir y venir entre el documento de Word y el Microsoft Visual Basic para aplicaciones ventana para seleccionar la imagen y aplicar el código. Eso consume demasiado tiempo.


Cambiar el tamaño de las imágenes con Kutools para Word

Con Kutools para Word 's Cambiar el tamaño de las imágenes utilidad, puede deshacerse de esas operaciones molestas y lentas, y cambiar el tamaño rápidamente de todas las imágenes de su documento.

Kutools for Word : con más de 300 complementos de Word prácticos, gratis para probar sin limitaciones en días 60.

1. Por favor aplique esta utilidad haciendo clic Empresa > Cambiar el tamaño de las imágenes. Ver captura de pantalla:

doc ajustar imágenes 2

2. Si desea cambiar el tamaño de todas las imágenes a un cierto porcentaje de su tamaño original, seleccione uno de los seis porcentajes de la lista desplegable. Por ejemplo, si desea cambiar el tamaño de todas las imágenes a 50% de su tamaño original, seleccione 50%. Después de hacer clic 25%, verá que todas las imágenes se han dimensionado a 50%. Ver captura de pantalla:

doc ajustar imágenes 3

Si desea ajustar todas las imágenes al mismo tamaño con una seleccionada, seleccione una imagen como el tamaño del modelo y luego haga clic en Empresa > Cambiar el tamaño de las imágenes > Cambiar el tamaño de las imágenes con selección, y todas las imágenes se redimensionarán del mismo tamaño en función del seleccionado, ver captura de pantalla:

doc ajustar imágenes 4

Para obtener información más detallada acerca de Kutools for Word, Cambiar el tamaño de las imágenes utilidad, haga clic en aquí.

¡Haz clic para descargar Kutools for Word y prueba gratuita ahora!


Demostración: cambiar el tamaño de todas las imágenes a la vez en Word

Kutools for Word: con más de 100 complementos de Word prácticos, de prueba sin límite en días 60. Descargar y prueba gratuita ahora!




Herramientas recomendadas de productividad de palabras

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

  • Las operaciones complicadas y repetidas se pueden realizar una sola vez en segundos.
  • Inserte varias imágenes a través de carpetas en el documento de Word a la vez.
  • Combine y combine varios archivos de Word en carpetas en uno con su orden deseado.
  • Divida el documento actual en documentos separados según el encabezado 1, 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, y así...
Say something here...
symbols left.
You are guest ( Sign Up? )
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.
    bravomail · 3 years ago
    If you save your document as .docx, then you will be able to open it as zip-archive. There will be media folder with all images (mine had PNG images). You can then use programs like IrfanView, XnViewMP, FastStone Viewer to perform batch transformations like resize, reduce color depth, etc. Pack your images back into zip and rename it to docx.

    For example, in my docx full of screenshots I needed to reduce number of colors to 8, which is enough for documentation purposes. After processing my 10MB doc became 1.8MB doc, so savings can be significant. Always save your original docx in case you want to restore pictures after too much degradation/processing etc.
  • To post as a guest, your comment is unpublished.
    Michael · 3 years ago
    I need to resize all images in a word document to the same width but not deform the images. so scale them to the same width. Is this possible through a macro?
  • To post as a guest, your comment is unpublished.
    Nik · 3 years ago
    Does anyone know if an image placeholder/dropper/automatic sizing feature is available in Windows 365? No idea where to look or find assistance on this since the Microsoft chat help was SO unhelpful. Any tips would be greatly appreciated.
  • To post as a guest, your comment is unpublished.
    E · 4 years ago
    save your money and run this macro: Credit to Dave

    Sub resizeimages()
    Dim i As Long
    With ActiveDocument
    For i = 1 To .InlineShapes.Count
    With .InlineShapes(i)
    .ScaleHeight = 60
    .ScaleWidth = 60
    End With
    Next i
    End With
    End Sub
    • To post as a guest, your comment is unpublished.
      Rosa · 2 years ago
      [i]save your money and run this macro: Credit to Dave

      Sub resizeimages()
      Dim i As Long
      With ActiveDocument
      For i = 1 To .InlineShapes.C ount
      With .InlineShapes(i )
      .ScaleHeight = 60
      .ScaleWidth = 60
      End With
      Next i
      End With
      End Sub
      [/i]
      Excellent!!! You saved my money and my time. Thank you very much!