I am importing numbers that has the minus sign to the right of the number. I
need a macro that can move the minus sign to the left of the number. I used
to have one but must have copied in incorrectly. What I has so far is..
Sub move_minus_left()
Dim currentcell As Object
For Each currentcell In Selection
If Right (currentcell.Value, 1)="-" Then
currentcell.formula="-"&left.

I really really need help with this as soon as possible. Thank you Very Much!

One way without a macro.

Select the data then DataText to Columns. Click Next twice to take you
to the Step3 screen. Click on Advanced. Make sure Trailing Minus for
Negative Numbers is checked. Click Ok and then Finish.

Hope this helps
Rowan

steve1961 wrote:
I am importing numbers that has the minus sign to the right of the number. I
need a macro that can move the minus sign to the left of the number. I used
to have one but must have copied in incorrectly. What I has so far is..
Sub move_minus_left()
Dim currentcell As Object
For Each currentcell In Selection
If Right (currentcell.Value, 1)="-" Then
currentcell.formula="-"&left.

I really really need help with this as soon as possible. Thank you Very Much!

I gave you an answer about 6 hours ago

--
Don Guillett
SalesAid Software

"steve1961" wrote in message
...
I am importing numbers that has the minus sign to the right of the number.
I
need a macro that can move the minus sign to the left of the number. I
used
to have one but must have copied in incorrectly. What I has so far is..
Sub move_minus_left()
Dim currentcell As Object
For Each currentcell In Selection
If Right (currentcell.Value, 1)="-" Then
currentcell.formula="-"&left.

I really really need help with this as soon as possible. Thank you Very
Much!