aplicar en todo el documento

07/12/2008 - 23:13 por Sergio | Informe spam
he escaneado unas fotos en word, la cuestion es que tengo unas 100 paginas.

El tema es que han quedado un poco pequeña, entonces me voy por ejemplo a la
primera hoja, le doy al boton dcho del raton y eligo- formato de imagen,
selecciono tamaño y la pongo a un 114 %, claro hacer todo esto hoja por hoja
es pesado, se puede hacer en todo de una vez.

gracias
 

Leer las respuestas

#1 Monica May
09/12/2008 - 16:32 | Informe spam
hola Sergio,

...escaneado... fotos en word...unas 100 paginas.
han quedado un poco peque#ame voy por ejemplo a la
primera hoja boton dcho del raton y eligo- formato de imagen,
selecciono tama#o y la pongo a un 114 %, .se puede...todo de una vez.



Puedes emplear codigo VBA para ello primero necesitaras saber si las
imagenes son flotantes o en linea con el texto, dependiendo de como esten
insertadas dichas imagenes puedes aplicar uno u otro codigo/s siguientes >>


->Si las imagenes estan en linea con el texto >>

'[]

Sub demo1()
Dim m As InlineShape

For Each m In ActiveDocument.InlineShapes
m.Width = 50
Next m

End Sub
'[]

->si estan flotantes >>

'[]

Sub demo2()
Dim m As Shape

For Each m In ActiveDocument.Shapes
m.Width = 50
Next m

End Sub


'[]


Comentanos cualquier duda o demas ...!!

Saludos
Monica


www.fermu.com
www.teladearana.es

Preguntas similares