Bordes celda y impressión

07/03/2010 - 19:36 por Descartes | Informe spam
Això és un missatge per a múltiples destinataris en format MIME.

=_NextPart_000_0008_01CABE2D.72EF1F80

Hola al grupo:

Vamos a ver si consigo explicarme, tengo una hoja que contiene diversa información, tengo puesto todos los bordes en las celdas, además tengo el siguiente macro:

Sub Ocultar_varias_filas()
Rows("46:65536").Select
Selection.EntireRow.Hidden = True
Range("A1").Select
End Sub

Sub Ocultar_varias_columnas()
Columns("O:IV").Select
Selection.EntireColumn.Hidden = True
Range("A1").Select
End Sub

Cuando imprimo la hoja, todas las lineas de la derecha no se imprimen, aunque en la hoja están activadas.

Jaime.
=_NextPart_000_0008_01CABE2D.72EF1F80

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18876"></HEAD>
<BODY style="PADDING-LEFT: 10px; PADDING-RIGHT: 10px; PADDING-TOP: 15px"
id=MailContainerBody leftMargin=0 topMargin=0 CanvasTabStop="true"
name="Compose message area">
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">Hola al
grupo:</FONT></STRONG></DIV>
<DIV>&nbsp;</DIV>
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">Vamos a ver si consigo
explicarme, tengo una hoja que contiene diversa información, tengo puesto todos
los bordes en las celdas, además tengo el siguiente macro:</FONT></STRONG></DIV>
<DIV>&nbsp;</DIV>
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">Sub
Ocultar_varias_filas()<BR>Rows("46:65536").Select<BR>Selection.EntireRow.Hidden
= True<BR>Range("A1").Select<BR>End Sub</FONT></STRONG></DIV>
<DIV>&nbsp;</DIV>
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">Sub
Ocultar_varias_columnas()<BR>Columns("O:IV").Select<BR>Selection.EntireColumn.Hidden
= True<BR>Range("A1").Select<BR>End Sub</FONT></STRONG></DIV>
<DIV>&nbsp;</DIV>
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">Cuando imprimo la hoja, todas
las lineas de la derecha no se imprimen, aunque en la hoja están activadas.
</FONT></STRONG></DIV><STRONG><FONT size=4 face="Clarendon Cn BT">
<DIV><BR>Jaime.</DIV></FONT></STRONG></BODY></HTML>

=_NextPart_000_0008_01CABE2D.72EF1F80--
 

Leer las respuestas

#1 Héctor Miguel
08/03/2010 - 00:57 | Informe spam
hola, Jaime!

asumo que por "... puestos todos los bordes..." te refieres a bordes personalizados (formatos)
y no al simple uso de los bordes "naturales" (mostrar la cuadricula) de las celdas (?)

en este caso considera que los bordes se aplican de forma "exterior" a las dimensiones de las celdas (p.e.)
=> nota que al aplicar un estilo grueso a todos los bordes de una celda...
a) su fila "crece" en altura (segun el tamano de fuente en ~ 1.5 puntos)
b) las filas anterior y posterior tambien "crecen" su altura en ~ 0.75 puntos

dada esta situacion, cuando decides ocultar filas y columnas "sobrantes" los bordes pierden su anclaje "exterior"

intenta a NO ocultar (al menos) una fila y una columna, las "inmediatamente" siguientes al ultimo borde (fila/columna)

saludos,
hector.

p.d. (des/re)ocultar filas y columnas, en (in)determinadas circunstancias podria causar tambien un "crecimiento" del archivo :-(

__ OP __
... tengo puesto todos los bordes en las celdas, ademas tengo el siguiente macro:

Sub Ocultar_varias_filas()
Rows("46:65536").Select
Selection.EntireRow.Hidden = True
Range("A1").Select
End Sub

Sub Ocultar_varias_columnas()
Columns("O:IV").Select
Selection.EntireColumn.Hidden = True
Range("A1").Select
End Sub

Cuando imprimo la hoja, todas las lineas de la derecha no se imprimen, aunque en la hoja estan activadas.

Preguntas similares