Guardar en otros formatos gráficos

09/07/2003 - 23:54 por manuel | Informe spam
Saludos al grupo.
Con EXCELL 97 realizo unos cálculos cuyo resultado debo mandar por mail,
para después imprimir.
No deseo enviar el archivo *.xls, pues al destinatario solo le interesan los
resultados.
Y además debo evitar en lo posible la posibilidad de modificación de datos
por manos extrañas.

Por ejemplo, una hoja de factura. Imaginad si el cliente puede modificar los
precios...

¿Cómo grabar la hoja en formato *.tif, *.gif, u otros para mandarla y que la
puedan ver e imprimir en su destino?
Puedo utilizar como formato el *.pdf, pero hay que utilizar el reader de
acrobat.
¿Sabeis de algún formato gráfico, aparte del *.pdf, adecuado para lo que
digo y que sea 'universalmente compatible con Windows'?
Gracias.
Saludos, Manuel.

Preguntas similare

Leer las respuestas

#1 Carlos Elizalde
10/07/2003 - 01:56 | Informe spam
Lo más fácil sería proteger los datos
1.-Formato --> Celdas --> Proteger (Bloqueada + Oculta)
Con "Bloqueada" conseguirás que no se puedan modificar los
datos
Con "Oculta" lo que consigues es que no se vean las
fórmulas empleadas.
2.-Herramientas --> Proteger -->Proteger Hoja
Con esto es suficiente.

Personalmente prefiero el formato PDF. El fichero
resultante "pesa" mucho menos que el de Excel y el
destinatario puede descargarse el AcrobatReader gratis.
Tiene un inconveniente: si el destinatario dispone
del "writer", podría realizar modificaciones en los datos.

Hay una tercera opción, pero los resultados son
imprevisibles: usar la "Cámara" de Excel. Con ella podrás
pegar una imagen de Excel en tu correo y enviarla... pero
¡OJO!, Te variará el formato
Saludos y SUERTE,

Carlos Elizalde

Saludos al grupo.
Con EXCELL 97 realizo unos cálculos cuyo resultado debo


mandar por mail,
para después imprimir.
No deseo enviar el archivo *.xls, pues al destinatario


solo le interesan los
resultados.
Y además debo evitar en lo posible la posibilidad de


modificación de datos
por manos extrañas.

Por ejemplo, una hoja de factura. Imaginad si el cliente


puede modificar los
precios...

¿Cómo grabar la hoja en formato *.tif, *.gif, u otros


para mandarla y que la
puedan ver e imprimir en su destino?
Puedo utilizar como formato el *.pdf, pero hay que


utilizar el reader de
acrobat.
¿Sabeis de algún formato gráfico, aparte del *.pdf,


adecuado para lo que
digo y que sea 'universalmente compatible con Windows'?
Gracias.
Saludos, Manuel.


.

Respuesta Responder a este mensaje
#2 Fernando Arroyo
10/07/2003 - 08:55 | Informe spam
Como dice Carlos Elizalde, tal vez lo mejor sea optar por el formato PDF, pero en cualquier caso sí es posible guardar un rango en formato GIF. El siguiente código guarda un rango de una hoja de cálculo como imagen. El formato de dicha imagen puede ser cualquiera de los almacenados en esta clave del registro de windows:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\Graphics Filters\Export
Normalmente, dichos tipos suelen ser GIF, JPG y BMP

Sub GuardarImagen()
Dim choObj As ChartObject, chGráf As Chart, ptImagen As Object
Dim blnGuardado As Boolean

Worksheets("Hoja1").Range("A1:I26").CopyPicture appearance:=xlScreen, Format:=xlPicture

Set choObj = ActiveSheet.ChartObjects.Add(0, 0, 800, 600)
Set chGráf = choObj.Chart

choObj.Activate
chGráf.ChartArea.Select
chGráf.Paste
Set ptImagen = chGráf.Pictures(1)

ptImagen.Left = 0
ptImagen.Top = 0

choObj.Border.LineStyle = xlNone
choObj.Width = ptImagen.Width + 7
choObj.Height = ptImagen.Height + 7

blnGuardado = chGráf.Export(Filename:="C:\ImagenExcel.GIF", filtername:="GIF")
If Not blnGuardado Then MsgBox prompt:="Problemas al guardar la imagen.", Buttons:=vbOKOnly + vbExclamation
choObj.Delete

Set choObj = Nothing
Set chGráf = Nothing
Set ptImagen = Nothing
End Sub

En este ejemplo se guarda el rango A1:I26 de Hoja1 como GIF.
Si el rango a guardar fuera muy grande, habría que cambiar el parámetro con nombre Appearance (que en el código está como xlScreen) a xlPrinter. La instrucción quedaría, pues:

Worksheets("Hoja1").Range("A1:I26").CopyPicture appearance:=xlPrinter, Format:=xlPicture

Un saludo.


Fernando Arroyo
MS MVP - Excel

"manuel" escribió en el mensaje news:
Saludos al grupo.
Con EXCELL 97 realizo unos cálculos cuyo resultado debo mandar por mail,
para después imprimir.
No deseo enviar el archivo *.xls, pues al destinatario solo le interesan los
resultados.
Y además debo evitar en lo posible la posibilidad de modificación de datos
por manos extrañas.

Por ejemplo, una hoja de factura. Imaginad si el cliente puede modificar los
precios...

¿Cómo grabar la hoja en formato *.tif, *.gif, u otros para mandarla y que la
puedan ver e imprimir en su destino?
Puedo utilizar como formato el *.pdf, pero hay que utilizar el reader de
acrobat.
¿Sabeis de algún formato gráfico, aparte del *.pdf, adecuado para lo que
digo y que sea 'universalmente compatible con Windows'?
Gracias.
Saludos, Manuel.


Respuesta Responder a este mensaje
#3 manuel
10/07/2003 - 23:17 | Informe spam
Gracias, Carlos.
Gracias, Fernando.
Gracias, Antonio Martínez. Sí que me interesa la opción que me dices.
Por favor pásame la "impresora" al mail, o si interesa al grupo y no es muy
costoso y se puede,
quizás convenga responder al grupo con un adjunto.

Saludos,
Manuel Morales.
Respuesta Responder a este mensaje
#4 Antonio Martínez
11/07/2003 - 09:12 | Informe spam
Te paso el archivo al mail si el grupo lo quiere lo publico pero pesa 355Kb
mas o menos

"manuel" escribió en el mensaje
news:
Gracias, Carlos.
Gracias, Fernando.
Gracias, Antonio Martínez. Sí que me interesa la opción que me dices.
Por favor pásame la "impresora" al mail, o si interesa al grupo y no es


muy
costoso y se puede,
quizás convenga responder al grupo con un adjunto.

Saludos,
Manuel Morales.


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida