ancho de columna segun formato

30/09/2005 - 16:37 por Charles | Informe spam
hola, quisiera hacerles una consulta.
tengo una hoja donde quisiera automáticamente determinado ancho de columna
según dicha columna tenga color amarillo de relleno o no tenga color de
relleno.
¿ es posible ? probé con formato condicional pero no lo logré.
muchas gracias

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
01/10/2005 - 07:41 | Informe spam
hola, Charles !

... quisiera automaticamente determinado ancho de columna segun... tenga color... de relleno o no [...]



-> toma nota que las propiedades de los objetos [como colores, ancho, alto, etc.]...
SOLO son 'manipulables'... a mano... o por codigo... NO desde las mismas funciones de hoja de calculo :(
-> tendrias que utilizar macros o codigo en los modulos de eventos de 'esa' hoja [aunque]...

-> no existe ningun evento que 'detecte' cambios en los formatos de las celdas :(
-> 'tendras que'... ser mas especifico en cuanto a las 'condiciones' con/por las que se cambian los colores :)

si comentas los detalles que se estan 'quedando en el tintero' ;)
saludos,
hector.
Respuesta Responder a este mensaje
#2 Charles
03/10/2005 - 14:17 | Informe spam
perdón por el poco detalle, es una planilla que tiene los días del mes, tengo
un formato condicional que cuando es sábado y domingo la columna se pone en
amarillo, si no queda sin color.
¿ en el formato condicional además de poner en amarillo los sábados y
domingos podré poner el ancho de la columna ? muchas gracias


"Héctor Miguel" escribió:

hola, Charles !

> ... quisiera automaticamente determinado ancho de columna segun... tenga color... de relleno o no [...]

-> toma nota que las propiedades de los objetos [como colores, ancho, alto, etc.]...
SOLO son 'manipulables'... a mano... o por codigo... NO desde las mismas funciones de hoja de calculo :(
-> tendrias que utilizar macros o codigo en los modulos de eventos de 'esa' hoja [aunque]...

-> no existe ningun evento que 'detecte' cambios en los formatos de las celdas :(
-> 'tendras que'... ser mas especifico en cuanto a las 'condiciones' con/por las que se cambian los colores :)

si comentas los detalles que se estan 'quedando en el tintero' ;)
saludos,
hector.



Respuesta Responder a este mensaje
#3 Héctor Miguel
03/10/2005 - 19:26 | Informe spam
hola, Charles 1

... una planilla que tiene los dias del mes... un formato condicional... sabado y domingo la columna... en amarillo
en el formato condicional... podre poner el ancho de la columna ?



-> NO... por formatos condicionales, formulas y funciones en la interfase de usuario... -> SOLO 'a mano' <- :-(
-> SI... si utilizar codigo [p.e.] en el modulo de eventos de 'esa' hoja ;)
-> suponiendo que existe una celda ['A1'] donde das entrada al mes 'de que se trate'...
y que los dias [fechas] estan en el rango 'B3:AF3'...
y que al ancho 'normal' de las columnas es de 4.5 y el de los sabados/domingos al doble [o sea, 9]...
prueba copiando las siguientes lineas...
en el modulo de codigo de 'esa' hoja ==Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.ScreenUpdating = False
Range("b3:af3").EntireColumn.ColumnWidth = 4.5
Dim Celda As Range
For Each Celda In Range("b3:af3")
If WeekDay(Celda, 2) > 5 Then Celda.ColumnWidth = 9
Next
End Sub

si cualquier duda [o informacion adicional]... comentas?
saludos,
hector.
Respuesta Responder a este mensaje
#4 Charles
03/10/2005 - 19:47 | Informe spam
como siempre, gracias Héctor por tu ayuda


"Héctor Miguel" escribió:

hola, Charles 1

> ... una planilla que tiene los dias del mes... un formato condicional... sabado y domingo la columna... en amarillo
> en el formato condicional... podre poner el ancho de la columna ?

-> NO... por formatos condicionales, formulas y funciones en la interfase de usuario... -> SOLO 'a mano' <- :-(
-> SI... si utilizar codigo [p.e.] en el modulo de eventos de 'esa' hoja ;)
-> suponiendo que existe una celda ['A1'] donde das entrada al mes 'de que se trate'...
y que los dias [fechas] estan en el rango 'B3:AF3'...
y que al ancho 'normal' de las columnas es de 4.5 y el de los sabados/domingos al doble [o sea, 9]...
prueba copiando las siguientes lineas...
en el modulo de codigo de 'esa' hoja ==> Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.ScreenUpdating = False
Range("b3:af3").EntireColumn.ColumnWidth = 4.5
Dim Celda As Range
For Each Celda In Range("b3:af3")
If WeekDay(Celda, 2) > 5 Then Celda.ColumnWidth = 9
Next
End Sub

si cualquier duda [o informacion adicional]... comentas?
saludos,
hector.



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