Visual Basic - Exportar imagen a Word

Life is soft - evento anual de software empresarial
 
Vista:

Exportar imagen a Word

Publicado por Jon (2 intervenciones) el 11/05/2006 11:03:11
Hola

Necesito exportar un archivo de imagen o el contenido de un control picture, a un documento Word.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Exportar imagen a Word

Publicado por Jona (25 intervenciones) el 11/05/2006 15:48:15
Debes utilizar automatizacion y dominar las macros en word.

Debes instanciar un documento de word en visual, con el metodo Create Object

'Capturas la imagen:

With CommonDialog1
.Filter = "Office Pictures " & _
"(*.gif,*.jpg,*.bmp)|*.gif;*.jpg;*.bmp"
.FilterIndex = 1
.Flags = cdlOFNFileMustExist Or cdlOFNHideReadOnly
.FileName = ""
.ShowOpen
sPictureName = .FileName
End With

'Dependiendo la version de office instalada en el tarro,
'el codigo seria algo asi:

If Val(.Version) >= 9 Then
'OFFICE 2000+
.Selection.InlineShapes.AddPicture FileName:=sPictureName
Else
'OFFICE 97
.ChangeFileOpenDirectory App.Path
.ActiveDocument.Shapes.AddPicture _
Anchor:=Selection.Range _
, FileName:=sPictureName _
, LinkToFile:=False _
, SaveWithDocument:=True
End If

.ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

Saludos cordiales,
Jonathan.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Exportar imagen a Word

Publicado por carlos (4 intervenciones) el 26/05/2006 02:19:50
porfavor espero que me ayuden hacer un programador excelente como ustedes ayuda porfavor gracias y espero que me mande mas trucos que ustedes saven gracias bye....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar