Como converter números positivos em negativos no Excel?

Como pode alterar rapidamente todos os números ou valores positivos para negativos no Excel? Os métodos seguintes mostram-lhe como converter de forma rápida todos os números positivos em negativos no Excel.

Alterar números positivos para negativos com a função Colar Especial

Alterar números positivos para negativos ou vice-versa com o Kutools para Excel

Alterar números positivos para negativos com código VBA

Alterar números positivos para negativos com a função Colar Especial

Pode transformar números positivos em negativos com a função Colar Especial no Excel. Siga os passos abaixo.

1. Toque no número -1 numa célula vazia e copie-o.

2. Destaque o intervalo que pretende alterar, clique com o botão direito do rato e selecione Colar Especial no menu de contexto para abrir a caixa de diálogo Colar Especial. Veja a captura de ecrã:

3. Em seguida, selecione a opção Tudo em Colar e, depois, Multiplicar em Operação.

4. Depois, clique em OK e todos os números positivos serão convertidos em números negativos.

5. Por fim, pode eliminar o número -1 sempre que necessário.

Converta números positivos em negativos ou vice-versa com Kutools para Excel

Pode também utilizar a ferramenta Kutools para Excel’s Alterar Sinal do Número para converter rapidamente todos os números positivos em negativos.

Se tiver instalado o Kutools para Excel, pode converter números positivos em negativos da seguinte forma:

1. Selecione o intervalo que pretende alterar.

2. Clique em Kutools > Conteúdo > Alterar Sinal do Número. Veja a captura de ecrã:

3. Na caixa de diálogo Alterar Sinal do Número, selecione a opção Mudar todos os números positivos para negativos.

4. Em seguida, clique em OK ou em Aplicar. Assim, todos os números positivos serão convertidos em números negativos.

Alterar números positivos para negativos com código VBA

Com código VBA, também pode converter números positivos em negativos — basta saber como utilizar o VBA. Siga os passos abaixo:

1. Selecione o intervalo que deseja alterar.

2. Clique em Programador > Visual Basic. Será apresentada uma nova janela do Microsoft Visual Basic para Aplicações. Clique em Inserir > Módulo e copie e cole o código seguinte no módulo:

Sub ChangeToNegative()
'Updateby Extendoffice
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
    xValue = rng.Value
    If xValue > 0 Then
        rng.Value = xValue * -1
    End If
Next
End Sub

3. Clique no botão para executar o código. Será apresentada uma caixa de diálogo para selecionar o intervalo cujos valores positivos pretende converter em negativos. Veja a captura de ecrã:

4. Clique em Ok e os valores positivos no intervalo selecionado serão convertidos imediatamente em negativos.

Demonstração: Converta números positivos em negativos ou vice-versa com Kutools para Excel

Artigos relacionados