Formato de objeto. imagenes

30/03/2010 - 18:08 por Teletreks | Informe spam
Hola a todos y gracias por vuestra colaboración.

Necesitaria, si fuera posible, el código necesario para aplicar a todos los
objetos de un documento las siguientes características:

Formato de objeto> Escala> Alto 100% ; Ancho 100%
Formato de objeto> Escala> Bloquear relación de aspecto: no marcado
Formato de objeto> Diseño> Estilo de ajuste: delante del texo
Formato de objeto> Diseño> Alineación horizontal: centrada

Gracias y saludos a todos.
 

Leer las respuestas

#1 Ignacio
31/03/2010 - 11:31 | Informe spam
¡Hola Teletreks!

Prueba con este código:
With ActiveDocument.Content.ShapeRange
.ScaleHeight 1, msoTrue 'Escala Alto
.ScaleWidth 1, msoTrue 'Escala Ancho
.LockAspectRatio = msoFalse 'Bloquear relación de aspecto
.WrapFormat.Type = wdWrapNone 'Estilo de ajuste
.Left = wdShapeCenter 'Alineación horizontal
End With

Asegúrate de que las imágenes son del tipo Shape. Si no deberás
convertirlos de InlineShape a Shape.

Espero que te funcione.

Un saludo,
Ignacio.

Preguntas similares