Formato condicional - Macros
Como haría un formato condicional, insertando "controles de formulario" para cambiar el formato de la moneda de S/. Y $, es para un formato de factura que hice.
1 Respuesta
Aclara esta cuestión, por favor. ¿Lo quieres es añadir el texto (S/. o $) al final de tu resultado obtenido con un botón de formulario o es una conversión de la moneda S/. a la moneda $?
lo q que quiero es agregar el texto
S/. o $ en la celda donde aparece un numero
Vale. Vamos a ello. Create un par de botones de formulario. En el texto de cada botón escribe lo necesario para identificar uno u otro. A continuación, entra en el proyecto y create un módulo. Pega este código:
Sub B_DOLAR_click()
Dim valor As Single
valor = ActiveCell.Value
ActiveCell.Value = valor & " $"
End Sub
Sub B_LETRA_click()
Dim valor As Single
valor = ActiveCell.Value
ActiveCell.Value = valor & " S/."
End Sub
Al botón $ asignale el sub B_DOLAR_click (botón derecho sobre el botón, asignar macro) y al botón S/. el otro.
Importante seleccionar una celda a aplicar el formato antes de picar sobre el botón.
Lo que hacen estos dos sencillos sub, s es toma el valor de la celda que hayas seleccionado y le añade el simbolo correspondiente. La variable valor está tomada para valores decimales.
en q parte del macro selecciono las celdas a las que le va a cambiar el formato??
Lo que hace la macro es teniendo una celda seleccionada añade el símbolo correspondiente cuando pulsas su botón, es decir, seleccionas una celdas, pulsas el botón y se añade el icono pero como te puse en el post anterior, debes crearte los botones. Si tienes problemas o no supieras como hacerlo, házmelo saber.
