Formato combinado de moneda y contabilidad, condicionado a otra ce

19/08/2006 - 19:00 por Ganzo Salvaje | Informe spam
Quiero hacer un formato personalizado con una leyenda volátil.

Voy en esto: _-$* #,##0.00_-;[Rojo] $* - #,##0.00_

Quiero agregarle al final de cada valor "Dólares" ó "M.N.", dependiendo del
valor escogido en un cuadro de lista, o sea, dependiendo del valor volátil de
la celda vinculada con ese control.

Sería algo más o menos así: _-$* #,##0.00" L7"_-;[Rojo] $* - #,##0.00" L7"_-
donde L7 es la celda que contiene la leyenda Dólares ó M.N., dependiendo de
la selección del control. Sobra decir que esta fórmula es incorrecta y marca
un error.

Espero me puedan ayudar. Saludos y gracias.
 

Leer las respuestas

#1 Héctor Miguel
20/08/2006 - 05:10 | Informe spam
hola, 'anonimo/a' !

Quiero hacer un formato personalizado con una leyenda volatil.
Voy en esto: _-$* #,##0.00_-;[Rojo] $* - #,##0.00_
Quiero agregarle al final de cada valor "Dolares" o "M.N.", dependiendo del valor escogido en un cuadro de lista
o sea, dependiendo del valor volatil de la celda vinculada con ese control.
Seria algo mas o menos asi: _-$* #,##0.00" L7"_-;[Rojo] $* - #,##0.00" L7"_-
donde L7 es la celda que contiene la leyenda Dolares o M.N., dependiendo de la seleccion del control...



[hasta donde se]... no creo que puedas 'mantener' un formato numerico personalizado con tal grado de... 'volatilidad' :-(
[sin embargo]... asumiendo que el contenido de 'L7' determina la 'volatilidad' que necesitas para un formato 'determinado'...

1) define/crea/estblece/... [no un formato numerico, sino]... un -> estilo personalizado [p.e. dale el nombre de 'Volatil'] :))
NO le apliques ningun formato numerico -de momento- y se lo cambias por codigo.
[obviamente] -> este ESTILO lo aplicas a celdas/rangos/... donde necesites ese formato 'volatil' ;)

2) copia/pega las siguientes lineas -> en el modulo de codigo de 'esa' hoja...
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("l7")) Is Nothing Then ThisWorkbook.Styles("Volatil") _
.NumberFormat = "_-$* #,##0.00 """ & [l7] & """_-;[Red] _$* - #,##0.00 """ & [l7] & """_;"
End Sub

3) toma en consideracion lo siguiente:
a) cada vez que 'alteres' el contenido de 'L7' sera re/definido el estilo 'Volatil' ;)
b) cada vez que suceda lo anterior... PERDERAS la pila de niveles disponibles en el des-hacer, undo, ctrl+Z :-(
c) [probablemente] llegara el momento en que andes 'dejando regados' -por ahi- varios formatos numericos personalizados -?-

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

Preguntas similares