En algunas calculadoras hay un pequeño botón que puede resultar muy útil: el botón más / menos. Este botón, cuando se presiona, cambiará cualquier valor en la pantalla entre sus valores positivos y negativos. Por ejemplo, si la pantalla muestra el número 57, al presionar el botón, la pantalla cambiará a -57. Si lo presiona de nuevo, el valor volverá a ser 57.

Si desea un «botón» que haga esto en Excel, encontrará rápidamente que no hay ninguno integrado en el programa. Sin embargo, puede crear uno rápidamente utilizando una macro:

Sub PlusMinus1()

Dim cell As Range

For Each cell In Selection         If Application.IsNumber(cell) Then             cell.Value = cell.Value * -1         End If     Next cell End Sub

Tenga en cuenta que la macro simplemente recorre cualquier rango de celdas que haya seleccionado cuando se inició la macro. Cada celda se comprueba para ver si contiene un número. Si es así, entonces el valor de ese número se multiplica por -1. El resultado es un signo de cambio de entrada para el número.

Un inconveniente de la macro es que si la celda contiene una fórmula, esa fórmula se convierte en un valor y luego se multiplica por el valor -1. Es posible que no desee perder sus fórmulas. En ese caso, podría confiar en una macro más discriminatoria, una que verifique si la celda contiene una fórmula o no. Si no es así, simplemente se multiplica por -1. Si es así, entonces la fórmula se ajusta para que el resultado se multiplique por -1.

Sub PlusMinus2()

Dim cell As Range

For Each cell In Selection         If Left(cell.Formula, 1) = "=" Then             Cell.Formula = cell.Formula & " * -1"

Elseif Application.IsNumber(cell) Then             cell.Value = cell.Value * -1         End If     Next cell End Sub

Puede asignar cualquiera de estas macros a una tecla de método abreviado o a un botón de la barra de herramientas para que sea fácil de usar en cualquier momento.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (3256) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posterior) aquí:

link: / excelribbon-Creating_a_Plus_Minus_Button [Creación de un botón más / menos].