Hoe verander je snel alle positieve getallen of waarden in negatief in Excel? De volgende methoden kunnen u helpen om snel alle positieve getallen in Excel in negatief te veranderen.

Verander positieve getallen in negatief met de functie Plakken speciaal

Verander positieve getallen in negatief of vice versa met Kutools voor Excel

Verander positieve getallen in negatief met VBA-code

Verander positieve getallen in negatief met de functie Plakken speciaal

Verbazingwekkend! Efficiënte tabbladen gebruiken in Excel zoals Chrome, Edge, Firefox en Safari!
Bespaar 50% van uw tijd en verminder elke dag duizenden muisklikken!

Met kunt u positieve getallen in negatief veranderen plakken speciaal functie in Excel. Ga als volgt te werk.

1. Tik op nummer -1 in een lege cel en kopieer deze.

2. Markeer het bereik dat u wilt wijzigen, klik met de rechtermuisknop en kies plakken speciaal vanuit het contextmenu om het plakken speciaal dialoog venster. Zie screenshot:

3. Selecteer vervolgens Alles optie van de pasta en Vermenigvuldigen van het Werking.

4. En klik vervolgens op OK, zijn alle positieve getallen veranderd in negatieve getallen.

5. Eindelijk kunt u het nummer -1 naar behoefte verwijderen.

Verander positieve getallen in negatief of vice versa met Kutools voor Excel

U kunt ook gebruik maken van Kutools for Excel's Verander Sign of Values tool om snel alle positieve getallen in negatief te veranderen.

Als je hebt geïnstalleerd Kutools for Excel, kunt u positieve getallen als volgt in negatief veranderen:

1. Selecteer het bereik dat u wilt wijzigen.

2. Klikken Kutools > Content > Verander Sign of Values, zie screenshot:

3. En in de Verander Sign of Values dialoogvenster, selecteer Verander alle positieve waarden in negatief optie.

4. Dan klikken OK or Solliciteer. En alle positieve getallen zijn omgezet in negatieve getallen.

Verander positieve getallen in negatief met VBA-code

Met VBA-code kunt u ook positieve getallen in negatief veranderen, maar u moet weten hoe u een VBA moet gebruiken. Voer de volgende stappen uit:

1. Selecteer het bereik dat u wilt wijzigen.

2. Klikken Ontwikkelaar >Visual Basic, Een nieuw Microsoft Visual Basic voor applicaties venster wordt weergegeven, klik op Invoegen > Moduleen kopieer en plak de volgende codes in de module:

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. Klik  knop om de code uit te voeren, verschijnt er een dialoogvenster waarin u een bereik kunt selecteren waarvan u de positieve waarden naar negatief wilt converteren. Zie screenshot:

4. Klikken Ok, dan worden de positieve waarden in het geselecteerde bereik in één keer omgezet in negatief.

Demo: verander positieve getallen in negatief of vice versa met Kutools voor Excel

Gerelateerde artikelen