如何在Excel中快速將所有正數或值更改為負數？ 以下方法可以指導您在Excel中快速將所有正數更改為負數。

使用選擇性粘貼功能將正數更改為負數

使用Kutools for Excel將正數更改為負數或反之亦然

使用VBA代碼將正數更改為負數

使用選擇性粘貼功能將正數更改為負數

驚人的！ 在 Excel 中使用高效的選項卡，如 Chrome、Edge、Firefox 和 Safari！
每天節省50％的時間，並減少數千次鼠標單擊！

您可以使用將正數更改為負數 選擇性粘貼 Excel中的功能。 請執行以下操作。

1。 分接頭號 -1 在空白單元格中並將其複制。

2. 突出顯示要更改的範圍，然後單擊鼠標右鍵並選擇 選擇性粘貼 從上下文菜單中打開 選擇性粘貼 對話框。 看截圖：

3。 然後選擇 全部 選項從 貼和 乘 來自 手術.

4。 然後點擊 OK，所有正數已更改為負數。

5。 最後，您可以根據需要刪除數字-1。

使用Kutools for Excel將正數更改為負數或反之亦然

您還可以使用 Excel的Kutools“ 改變價值觀 快速將所有正數更改為負數的工具。

如果你已經安裝 Excel的Kutools，您可以將正數更改為負，如下所示：

1。 選擇您要更改的範圍。

2。 點擊 庫工具 > 內容 > 改變價值觀，請參見屏幕截圖：

3。 而在中 改變價值觀 對話框中選擇 將所有正值更改為負值 選項。

4。 然後點擊 OK or 登記。 並且所有正數都已轉換為負數。

使用VBA代碼將正數更改為負數

使用VBA代碼，您也可以將正數更改為負數，但是您必須知道如何使用VBA。 請按照以下步驟操作：

1。 選擇您要更改的範圍。

2。 點擊 開發者 >Visual Basic中，一個新的 適用於應用程序的Microsoft Visual Basic 將顯示一個窗口，單擊 插入 > 模塊然後將以下代碼複製並粘貼到模塊中：

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. 點擊  按鈕運行代碼，將彈出一個對話框，供您選擇要將正值轉換為負值的範圍。 看截圖：

4。 點擊 Ok，然後將所選範圍內的正值立即轉換為負值。

演示：使用Kutools for Excel將正數更改為負數，反之亦然

相關文章