Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Error con Macro - PDF - Win Server 2003

04/04/2011 - 18:06 por marredondo | Informe spam
Ayuda Hacer una pregunta
Buenos días.
Tengo un problema con una macro para exportar un area definida de una hoja de excel (2007) a formato pdf.

la planilla la confeccioné en una maquina (win 7, office 2007) y alli funciona perfectamente. ahora bien, esta maquina está en red y cuando pongo el archivo excel en el servidor, para poder usarse desde otras maquinas de la red, y ejecuto dicha macro me manda a depurar.

macro en cuestión:

Sub ImpPDF()
'
' ImpPDF Macro
'

'
Dim RutaArchivo As String
RutaArchivo = "C:\Users\Mariano\Desktop\Cotizaciones\" + Cells(43, 7) + ".pdf"
Range("A1:M56").Select
Range("M56").Activate
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Range("B19").Select
End Sub

y me resalta:

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

esas lineas.

no puedo dar con el problema.

muchas gracias de antemano.
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 marredondo
04/04/2011 - 18:13 | Informe spam
marredondo escribió el 04/04/2011 18:06 :
Buenos días.
Tengo un problema con una macro para exportar un area definida de una hoja de
excel (2007) a formato pdf.

la planilla la confeccioné en una maquina (win 7, office 2007) y alli
funciona perfectamente. ahora bien, esta maquina está en red y cuando
pongo el archivo excel en el servidor, para poder usarse desde otras maquinas
de la red, y ejecuto dicha macro me manda a depurar.

macro en cuestión:

Sub ImpPDF()
'
' ImpPDF Macro
'

'
Dim RutaArchivo As String
RutaArchivo = "C:UsersMarianoDesktopCotizaciones" + Cells(43, 7)
+ ".pdf"
Range("A1:M56").Select
Range("M56").Activate
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Range("B19").Select
End Sub

y me resalta:

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

esas lineas.

no puedo dar con el problema.

muchas gracias de antemano.


me faltó poner el cartel de error que aparece al ejecutar la macro:

"Se ha producido el error 1004 en tiempo de ejecucion:
no se ha guardado el documento. Puede que el documento esté abierto o que se haya encontrado un error al guardar"

gracias
Respuesta Responder a este mensaje
#2 Cacho R
06/04/2011 - 17:37 | Informe spam
Hola! marredondo

No sé si será un problema del Foro, pero y en principio, te has
olvidado colocar las barras invertidas en "RutaArchivo". O sea que
debería ser:

C:\Users\Mariano\Desktop\Cotizaciones

en lugar de:
C:UsersMarianoDesktopCotizaciones

Saludos, Cacho.

On 4 abr, 13:06, marredondo wrote:
Buenos d as.
 Tengo un problema con una macro para exportar un area definida de una hoja de
 excel (2007) a formato pdf.

 la planilla la confeccion en una maquina (win 7, office 2007) y alli
 funciona perfectamente. ahora bien, esta maquina est en red y cuando
 pongo el archivo excel en el servidor, para poder usarse desde otras maquinas
de
 la red, y ejecuto dicha macro me manda a depurar.

 macro en cuesti n:

 Sub ImpPDF()
 '
 ' ImpPDF Macro
 '

 '
 Dim RutaArchivo As String
 RutaArchivo = "C:UsersMarianoDesktopCotizaciones" + Cells(43, 7) +
 ".pdf"
 Range("A1:M56").Select
 Range("M56").Activate
 Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
 RutaArchivo, _
 Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
 :=False, OpenAfterPublish:=False
 Range("B19").Select
 End Sub

 y me resalta:

 Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
 RutaArchivo, _
 Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
 :=False, OpenAfterPublish:=False

 esas lineas.

 no puedo dar con el problema.

 muchas gracias de antemano.
Respuesta Responder a este mensaje
#3 marredondo
06/04/2011 - 19:18 | Informe spam
marredondo escribió el 04/04/2011 18:06 :
Buenos días.
Tengo un problema con una macro para exportar un area definida de una hoja de
excel (2007) a formato pdf.

la planilla la confeccioné en una maquina (win 7, office 2007) y alli
funciona perfectamente. ahora bien, esta maquina está en red y cuando
pongo el archivo excel en el servidor, para poder usarse desde otras maquinas
de la red, y ejecuto dicha macro me manda a depurar.

macro en cuestión:

Sub ImpPDF()
'
' ImpPDF Macro
'

'
Dim RutaArchivo As String
RutaArchivo = "C:UsersMarianoDesktopCotizaciones" + Cells(43, 7)
+ ".pdf"
Range("A1:M56").Select
Range("M56").Activate
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Range("B19").Select
End Sub

y me resalta:

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

esas lineas.

no puedo dar con el problema.

muchas gracias de antemano.


Gracias por responder

las barras están, solo que no aparecen en la "cita"
por otro lado ¿porque puede no ser un problema para el foro?

gracias
Respuesta Responder a este mensaje
#4 marredondo
07/04/2011 - 17:00 | Informe spam
marredondo escribió el 04/04/2011 18:06 :
Buenos días.
Tengo un problema con una macro para exportar un area definida de una hoja de
excel (2007) a formato pdf.

la planilla la confeccioné en una maquina (win 7, office 2007) y alli
funciona perfectamente. ahora bien, esta maquina está en red y cuando
pongo el archivo excel en el servidor, para poder usarse desde otras maquinas
de la red, y ejecuto dicha macro me manda a depurar.

macro en cuestión:

Sub ImpPDF()
'
' ImpPDF Macro
'

'
Dim RutaArchivo As String
RutaArchivo = "C:UsersMarianoDesktopCotizaciones" + Cells(43, 7)
+ ".pdf"
Range("A1:M56").Select
Range("M56").Activate
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Range("B19").Select
End Sub

y me resalta:

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RutaArchivo, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

esas lineas.

no puedo dar con el problema.

muchas gracias de antemano.


Gracias a todos.

La carpeta donde quería guardar el archivo pdf no estaba compartida y no me habia dado cuenta.

ahora funciona perfectamente.

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