Formateo de celdas a partir de la segunda pasada
Publicado por apacheco (65 intervenciones) el 15/06/2011 13:24:55
Estoy convirtiendo una facturacion impresa con Crystal Reports para obtenerla factura a factura en Excel para archivarla y simultaneamente en PDF.
El problema es que al realizar la primera factura el excel no me da ningun problema, PERO AL REALIZAR LA SEGUNDA me da el siguinte error
Variable de tipo Object o la variable de bloque With no está establecida
El error se produce al realizar la ultima instruccion del grupo que adjunto (es un formateo de celdas a nivel de contorno)
Private Sub Formatear_Fila_Liquidacion(ByVal tipo As String, ByVal fila As Long)
On Error Resume Next
Select Case tipo
Case "Ordenante"
objHoja.Range("A" & fila & ":F" & fila).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
he probado con
Range("A" & fila & ":F" & fila).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
y el resultado es el mismo.
al acabar cada factura logicamente la guardo (Save), Cierro el libro, hago el Quit al excel e igualoa Nothing las 3 variables excel, libro y hoja.
¿PORQUE NO FALLA AL REALIZAR LA PRIMERA FACTURA Y SI EN LAS RESTANTES?
Debe ser que las hojas de calculo me odian lo mismo que yo a ellas.
El problema es que al realizar la primera factura el excel no me da ningun problema, PERO AL REALIZAR LA SEGUNDA me da el siguinte error
Variable de tipo Object o la variable de bloque With no está establecida
El error se produce al realizar la ultima instruccion del grupo que adjunto (es un formateo de celdas a nivel de contorno)
Private Sub Formatear_Fila_Liquidacion(ByVal tipo As String, ByVal fila As Long)
On Error Resume Next
Select Case tipo
Case "Ordenante"
objHoja.Range("A" & fila & ":F" & fila).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
he probado con
Range("A" & fila & ":F" & fila).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
y el resultado es el mismo.
al acabar cada factura logicamente la guardo (Save), Cierro el libro, hago el Quit al excel e igualoa Nothing las 3 variables excel, libro y hoja.
¿PORQUE NO FALLA AL REALIZAR LA PRIMERA FACTURA Y SI EN LAS RESTANTES?
Debe ser que las hojas de calculo me odian lo mismo que yo a ellas.
Valora esta pregunta
0