Terminar macro

10/04/2006 - 16:40 por Jhon Alexander | Informe spam
Hola, desarrolle una macro para que me inserte un imagen desde archivo,
necesito saber que comando debo de utilizar para que después de insertada la
imagen esta me la ponga detrás del texto.
Alex
 

Leer las respuestas

#1 David
10/04/2006 - 21:11 | Informe spam
Hola, Alexander.

Después de insertada la imagen, te va a ser un tanto difícil, pues tendrías
que averiguar el nombre o índice de la imagen que acabas de insertar, y eso
te complicaría bastante el problema. La operación que necesitas la debes
hacer al momento de insertar la imagen. ¿Cómo? Utiliza el comando With al
insertar la imagen, y luego especificas todas las propiedades que necesites.
Cuando cierres End With, éstas quedarán aplicadas a la nueva imagen. Piensa
en algo como esto:

With ActiveDocument.Shapes.AddPicture(Anchor:=Selection.Range, _
FileName:= "[Ruta + nombre y extensión de tu archivo", _
LinkToFile:=False, SaveWithDocument:=True)

.WrapFormat.Type = 3
.ZOrder 5

End With

Las propiedades WrapFormat.Type y ZOrder son las que hacen precisamente que
la imagen quede detrás del texto. Si necesitas alguna otra, puedes
seleccionar una imagen cualquiera, hechas a andar la grabadora de macros y
aplicas las propiedades que necesites. Luego, las copias y las pegas entre
las instrucciones With y End With que te muestro arriba.

Espero que esto te sirva. Saludos...

Cordialmente,


"Jhon Alexander" escribió:

Hola, desarrolle una macro para que me inserte un imagen desde archivo,
necesito saber que comando debo de utilizar para que después de insertada la
imagen esta me la ponga detrás del texto.
Alex

Preguntas similares