change negitave value to positive

T

TJR

I am downloading banking inofrmation to a spreadsheet. It downloads as a
negitive value. Is there a way to automaticly change this?
 
M

Mike H

Not sure about automatic but one manual way.

Put -1 in a cell, select that cell and copy it.

Select all your cells with negative values then

Edit|paste special|multiply and click OK
delete the cell with -1 in
 
G

Gord Dibben

Can you change the value at the source?

If not......................

Enter -1 in a cell.

Copy that cell then select your range of negative numbers and Edit>Paste
Special>Multiply>OK>Esc.

Not so automatic but you could record a macro to do this.


Gord Dibben MS Excel MVP
 
A

ab3d4u

Mike said:
Not sure about automatic but one manual way.

Put -1 in a cell, select that cell and copy it.

Select all your cells with negative values then

Edit|paste special|multiply and click OK
delete the cell with -1 in

:
-
I am downloading banking inofrmation to a spreadsheet. It downloads as
a
negitive value. Is there a way to automaticly change this?-

Mike,
Thanks for this simple trick. I was doing this the long way - Inseret
a column, multiply by -1, then copy and paste values. It worked but
some time it shows more digits than I care for.
 
R

ryguy7272

Hope this helps.....
Sub DelNegative()
For X = 1 To 1
Dim redRng As Range
Set redRng = Range("A1", Range("A100").End(xlUp))
For Each cell In redRng
If cell.Value <= 0 Then
cell.Value = Abs(cell)
End If
Next cell
Next X
End Sub
 
Top