Ich möchte in meiner Excelmappe alle Zahlen die positiv dargestellt sind negativ darstellen und umgekehrt. wie kann ich das schnellstens lösen?
lg thomas
Sub MinusAufPlusUndUmgekehrt()
Dim rng As Range
For Each rng In Selection
rng.Value = rng.Value * -1
Next
End Sub
Sub schneller()
[iv65536] = -1
[iv65536].Copy
Range("A1:Z1000").PasteSpecial Operation:=xlMultiply
[iv65536].Clear
End Sub