Exportar graficas de Excel a Word

Hola Jorge :-)

Buenos Días;

La pregunta es como hago para exportar una grafica que yo tengo en excel a
un documento de word y poner la grafica en un lugar especifico del documento.

Muchas gracias.
Saludos.

Bien puedes realizar ese grafico en word ?? quiza asi puedas mejor
acoplar el grafico en el documento, puesto que dependiendo de las
proporciones de tu grafico es posible que se descuadre todo y haya que
usar otros medios y nos cueste mas cocinar la salsa que el cordero :)

Bien comentanos ok? :-)

Saludos
Monica




Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com

Hola Monica;

"Tux" wrote:

Bien puedes realizar ese grafico en word ?? quiza asi puedas mejor
acoplar el grafico en el documento, puesto que dependiendo de las
proporciones de tu grafico es posible que se descuadre todo y haya que
usar otros medios y nos cueste mas cocinar la salsa que el cordero :)

Bien comentanos ok? :-)

La verdad es que no se hacer graficos en word o por lo menos del tipo que yo
necesito. Las graficas que necesito, son graficas de barras y graficas de
lineas.
Las graficas se hacen cada mes, graficando el dia, contra el valor de una
variable especifica.
Por esa razon, las graficas siempre son hechas en excel y de excel pegadas
en word. Con la opcion que ayudaste la ultima vez, lo que estabamos haciendo
era, realizando las graficas en excel, pegandolas en Paint, guardandolas y
despues insertandolas en la plantilla de word bloqueada.

La pregunta es si es posible llevarlas directamente de excel hasta la
plantilla de word que se encuentra bloqueada, tal vez insertando en la
grafica en algun marcador o algo parecido.

Muchas gracias por tu atencion.

Saludos,
Cordialmente, Jorge.

Hola de nuevo Jorge :-)

La pregunta es si es posible llevarlas directamente de excel hasta la
plantilla de word que se encuentra bloqueada, tal vez insertando en la
grafica en algun marcador o algo parecido.

Muchas gracias por tu atencion.

Saludos,
Cordialmente, Jorge.

Bien suponiendo que el grafico esta insertado en la hoja 1 de tu
documento de excel o libro de excel mejor dicho pues prueba el siguiente
codigo ok? OJO » siempre y cuando este insertado en la hoja en donde se
tengan los datos y comentanos ok? :-)



'[]

Sub Grafico_excels_word()

Dim x As Excel.Application
Dim Y As Excel.Workbook
Dim problems As Boolean

On Error Resume Next

Set x = GetObject(, "Excel.Application")

If Err Then
problems = True
Set x = New Excel.Application
End If

On Error GoTo 0

Set Y = x.Workbooks.Open _
("c:\libro1.xls")
With Y.Sheets("hoja1")
.Shapes("Chart 1").Copy

End With
With Selection

ActiveDocument.GoTo What:=wdGoToBookmark, Name:="uno"
.PasteAndFormat (wdPasteDefault)

End With

Y.Close SaveChanges:=False
x.Quit

Set Y = Nothing:
Set x = Nothing
End Sub


'[]



Saludos
Monica



Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com

Anotacion [ aqui el muñequito que silva ] :-P !!


Se me olvido decir que:

Bien ves al Editor de visual basic y busca el menu » herramientas »
Referencias y ahi busca :

Microsoft Excel 11.0 Object Library [ donde » XX.0 dependera de tu

version de office ]

Si tienes Excel 2003 sera la referencia » Microsoft Excel 11.0 object
Library

si tienes el Excel 2002 entoces sera » Microsfot excel 10.0 object
library y ect.

Pues bien tildada o marcala y acepta [ ya que sin la libreria de excel
no podermos operar con excel :-) ]