Impresión a archivo + PDF

hola, javier !

Mediante printout se supone que se puede imprimir documentos a PDF, segun la rutina:
Application.ActivePrinter = "Adobe PDF en Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF en Ne01:", PrintToFile:=True, Collate:=True, _
PrToFileName:=nombrePDF
donde nombrePDF es la ruta: "C:\documento.pdf"
sin embargo me da el siguiente error:
"When you create a postcript file you have to send the host fonts.. "
parece que el metodo printout no permite la impresion a pdf y manda la impresion a formato postscript.
Se puede hacer que imprima en pdf, como?

revisa en las propiedades de la impresora [adobe pdf] en el panel de control de windows
y comprueba que no tenga una marca la opcion de: "do not send fonts to adobe pdf"
[y por si las dudas, verifica que tampoco tenga marca la opcion de: "prompt for adobe pdf filename"]

tambien pudiera ser algun objeto incrustado que este *reducido* a una linea por ocultarse filas [graficos, dibujos] -?-

comentas [si hubiera] algun detalle mas... 'significativo' ?
saludos,
hector.

Hola Héctor,

Eso ya lo había probado y no genera el documento pdf correctamente.

La cuestión es que genera un archivo "documento.pdf" pero que
realmente no es pdf ya que no se puede abrir y lo genera con más kb
que otros docs en pdf del mismo estilo. En resumidas cuentas que no
manda un doc pdf a imprimir.

Alguna idea?. No habrá que instalar alguna biblioteca de adobe?. Desde
luego que cambiando la impresora y mandando a imprimir con .PrintOut
no funciona.

Gracias y saludos,

Javi



On 13 jul, 22:08, "Héctor Miguel"
wrote:

hola, javier !

> Mediante printout se supone que se puede imprimir documentos aPDF, segun la rutina:
> Application.ActivePrinter = "AdobePDFen Ne01:"
> ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> "AdobePDFen Ne01:", PrintToFile:=True, Collate:=True, _
> PrToFileName:=nombrePDF
> donde nombrePDF es la ruta: "C:\documento.pdf"
> sin embargo me da el siguiente error:
> "When you create a postcript file you have to send the host fonts.. "
> parece que el metodo printout no permite la impresion apdfy manda la impresion a formato postscript.
> Se puede hacer que imprima enpdf, como?

revisa en las propiedades de la impresora [adobepdf] en el panel de control de windows
y comprueba que no tenga una marca la opcion de: "do not send fonts to adobepdf"
[y por si las dudas, verifica que tampoco tenga marca la opcion de: "prompt for adobepdffilename"]

tambien pudiera ser algun objeto incrustado que este *reducido* a una linea por ocultarse filas [graficos, dibujos] -?-

comentas [si hubiera] algun detalle mas... 'significativo' ?
saludos,
hector.

hola, javier !

Eso ya lo habia probado y no genera el documento pdf correctamente.
La cuestion es que genera un archivo "documento.pdf" pero que realmente no es pdf ya que no se puede abrir
y lo genera con mas kb que otros docs en pdf del mismo estilo. En resumidas cuentas que no manda un doc pdf a imprimir.
Alguna idea?. No habra que instalar alguna biblioteca de adobe?.
Desde luego que cambiando la impresora y mandando a imprimir con .PrintOut no funciona.

si el controlador de la impresora no esta reconociendo el formato [y revisando tu consulta original]...
es probable que este *mal direccionada* la salida del documento a la impresora -?-
[da la impresion de que] al nombre de la impresora: -> "AdobePDFen Ne01:"
le falta un espacio *antes* de la conexion al puerto: -> "AdobePDF en Ne01:"

si *esto* no es la posible causa... ni tampoco nada de lo anterior... -???-
comentas [si hubiera] algun detalle mas... 'significiativo' ?
saludos,
hector.

__ las consultas anteriores __

> Mediante printout se supone que se puede imprimir documentos aPDF, segun la rutina:
> Application.ActivePrinter = "AdobePDFen Ne01:"
> ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> "AdobePDFen Ne01:", PrintToFile:=True, Collate:=True, _
> PrToFileName:=nombrePDF
> donde nombrePDF es la ruta: "C:\documento.pdf"
> sin embargo me da el siguiente error:
> "When you create a postcript file you have to send the host fonts.. "
> parece que el metodo printout no permite la impresion apdfy manda la impresion a formato postscript.
> Se puede hacer que imprima enpdf, como?

revisa en las propiedades de la impresora [adobepdf] en el panel de control de windows
y comprueba que no tenga una marca la opcion de: "do not send fonts to adobepdf"
[y por si las dudas, verifica que tampoco tenga marca la opcion de: "prompt for adobepdffilename"]

tambien pudiera ser algun objeto incrustado que este *reducido* a una linea por ocultarse filas [graficos, dibujos] -?-

comentas [si hubiera] algun detalle mas... 'significativo' ?

Hola Héctor,

Con :

Application.ActivePrinter = "Adobe PDF en Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF en Ne01:", Collate:=True

Consigo que se cree un archivo pdf que se guarda en el temporal. Pero
no consigo hacer que se archive correctamente en la dirección "C:
\documento.pdf" . No funciona con el argumento PrToFileName:=nombrePDF
y da los errores que te comento en líneas anteriores.

Alguna idea de qué comando incluir después para que el archivo del
temporal se archive y cierre según quiero.

Definitivamente la impresora correcta es: "Adobe PDF en Ne01:"

Gracias

Javi


On 23 jul, 18:52, "Héctor Miguel"
wrote:

hola, javier !

> Eso ya lo habia probado y no genera el documentopdfcorrectamente.
> La cuestion es que genera un archivo "documento.pdf" pero que realmente no espdfya que no se puede abrir
> y lo genera con mas kb que otros docs enpdfdel mismo estilo. En resumidas cuentas que no manda un docpdfa imprimir.
> Alguna idea?. No habra que instalar alguna biblioteca de adobe?.
> Desde luego que cambiando la impresora y mandando a imprimir con .PrintOut no funciona.

si el controlador de la impresora no esta reconociendo el formato [y revisando tu consulta original]...
es probable que este *mal direccionada* la salida del documento a la impresora -?-
[da la impresion de que] al nombre de la impresora: -> "AdobePDFen Ne01:"
le falta un espacio *antes* de la conexion al puerto: -> "AdobePDF en Ne01:"

si *esto* no es la posible causa... ni tampoco nada de lo anterior... -???-
comentas [si hubiera] algun detalle mas... 'significiativo' ?
saludos,
hector.

__ las consultas anteriores __



> > Mediante printout se supone que se puede imprimir documentos aPDF, segun la rutina:
> > Application.ActivePrinter = "AdobePDFen Ne01:"
> > ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
> > "AdobePDFen Ne01:", PrintToFile:=True, Collate:=True, _
> > PrToFileName:=nombrePDF
> > donde nombrePDF es la ruta: "C:\documento.pdf"
> > sin embargo me da el siguiente error:
> > "When you create a postcript file you have to send the host fonts.. "
> > parece que el metodo printout no permite la impresion apdfy manda la impresion a formato postscript.
> > Se puede hacer que imprima enpdf, como?

> revisa en las propiedades de la impresora [adobepdf] en el panel de control de windows
> y comprueba que no tenga una marca la opcion de: "do not send fonts to adobepdf"
> [y por si las dudas, verifica que tampoco tenga marca la opcion de: "prompt for adobepdffilename"]

> tambien pudiera ser algun objeto incrustado que este *reducido* a una linea por ocultarse filas [graficos, dibujos] -?-

> comentas [si hubiera] algun detalle mas... 'significativo' ?- Ocultar texto de la cita -

- Mostrar texto de la cita -

hola, Javier !

Con :
Application.ActivePrinter = "Adobe PDF en Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF en Ne01:", Collate:=True
Consigo que se cree un archivo pdf que se guarda en el temporal.
Pero no consigo hacer que se archive correctamente en la dirección "C:\documento.pdf".
No funciona con el argumento PrToFileName:=nombrePDF y da los errores que te comento en líneas anteriores.
Alguna idea de que comando incluir despues para que el archivo del temporal se archive y cierre segun quiero.
Definitivamente la impresora correcta es: "Adobe PDF en Ne01:"

-> PrToFileName tiene soporte a partir de la version 2000
[probablemente] la macro falla cuando la ejecutas en un xl-'97 -?-

comentas [si hubiera] algun detalle adicional ?
saludos,
hector.