View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
wilson@irco
 
Posts: n/a
Default flip negative sign

It works...thank you for that and the link for macro newbies. :)

"Dave Peterson" wrote:

Dana DeLouis posted this:


Sub TrailingMinus()
' = = = = = = = = = = = = = = = =
' Use of CDbl suggested by Peter Surcouf
' Program by Dana DeLouis,
' = = = = = = = = = = = = = = = =
Dim rng As Range
Dim bigrng As Range

On Error Resume Next
Set bigrng = Cells.SpecialCells(xlConstants, xlTextValues).Cells
If bigrng Is Nothing Then Exit Sub

For Each rng In bigrng.Cells
rng = CDbl(rng)
Next
End Sub

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

wilson@irco wrote:

Using copy paste from AS400 to excel spreadsheet negative numbers do not read
negative because the negative sign remains on the right side of the number in
excel. Is there an easy way to flip the negative sign from the right side of
the number to the left side?


--

Dave Peterson