Cambiar el signo de una celda

Hola,

aún más simple (viene del soporte de Microsoft):

1. Escribir el número -1 en una celda vacía de la hoja de cálculo
2. Seleccionar esta celda
3. En el menú Edición, seleccionar el comando Copiar
4. Seleccionar el rango de celdas cuyo signo se desea invertir
5. En el menú Edición, seleccionar el comando Pegado especial
6. Seleccionar Pegar Valor y Operación Multiplicación
7. Hacer clic en OK

Hasta luego
Eric

Sub InverserSigne()
Dim cel As Range
For Each cel In Selection
If cel.Value = "" Then
Else
If IsNumeric(cel) Then
cel.Value = cel.Value * -1
End If
End If
Next
End Sub

este código permite cambiar el signo de una o varias celdas seleccionadas.

Gracias por esta respuesta rápida.

Esta macro funciona perfectamente.

Ahora está integrada en mi programa de gestión de club, que ahora contiene unas 45 macros.

deberías fusionar tus macros

Fusionar macros, no sé cómo hacerlo.

Sin embargo, no entiendo muy bien, porque cada una tiene su propia función y están creadas en la carpeta del editor de Visual Basic que a su vez está integrado en mi programa Excel.

Gracias de todos modos por la información.

Creo que la solución más simple es la de Kgigan, que consiste en una macro VBA que ejecuto al presionar un botón.
También funciona para una o varias celdas seleccionadas.
Sin embargo, gracias por tu respuesta.

Papyjlsn