Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Bordes celda y impressión

07/03/2010 - 19:36 por Descartes | Informe spam
Ayuda Hacer una pregunta
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--
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta

Preguntas similare

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.
Respuesta Responder a este mensaje
#2 Descartes
10/03/2010 - 20:05 | Informe spam
Això és un missatge per a múltiples destinataris en format MIME.

=_NextPart_000_0060_01CAC08C.FB63DA20

Gracias Hector, te contesto desde mi consulta, no se que pasa pero no puedo de del tuyo:

Tengo el siguiente problema si modifico la macro, Rows("47:65536").Select, no efectua la modificación como solucion alternativa he borrado la macro, programador > macros >Sub Ocultar_varias_columnas(), pero no activa las columnas, continua como si la macro estuviera activa. Alguna solucion?

Jaime
-
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_0060_01CAC08C.FB63DA20

<!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">
<DIV><STRONG><FONT size=2 face=Verdana>Gracias Hector,&nbsp; te contesto desde
mi consulta, no se que pasa pero no puedo de del tuyo:</FONT></STRONG></DIV>
<DIV><STRONG></STRONG><FONT size=2 face=Verdana></FONT>&nbsp;</DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>Tengo el siguiente problema si
modifico la macro, Rows("47:65536").Select</STRONG>,<STRONG>&nbsp;no efectua la
modificación como solucion alternativa he borrado la macro, programador &gt;
macros &gt;</STRONG><STRONG>Sub Ocultar_varias_columnas(), pero no activa las
columnas, continua como si la macro estuviera activa. Alguna
solucion?</STRONG></FONT></FONT></DIV>
<DIV><STRONG></STRONG><FONT size=2 face=Verdana></FONT>&nbsp;</DIV>
<DIV><FONT size=4 face="Clarendon Cn BT"><STRONG><FONT
face=Clarendon-Light-DTC><FONT face="Clarendon Cn BT"><FONT size=2
face=Verdana>Jaime</FONT>
</FONT></FONT></STRONG></FONT></DIV></FONT></STRONG></DIV>
<DIV><STRONG><FONT size=4 face="Clarendon Cn BT">-</FONT></STRONG></DIV>
<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_0060_01CAC08C.FB63DA20--
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida