I need some help figuring this out. I created a small script that changes a value in a cell into a positive if the number is negative and vice versa. For example if the value is 100 the script will change it to -100 or if it's -100 it changes to 100. I was able to make it work for one cell but now I would like to inplimented on a range of cells for example all cells from B33 to B50. Thanks in advance.
Sub Sing_Change() If Range("E9") > 0 Then Range("E9") = -(Range("E9")) Else Range("E9") = Abs(Range("E9")) End If End Sub