I've got some data in the format:

$9,212.00

I want it to show as

9212.00

I've tried using this:

With ActiveSheet.Columns("E", "L", "R", "S", "Z", "AB", "AC")
.NumberFormat = "0.00"
End With

In the relevant columns but it's not working, the figures still show
in their original format, what did I do wrong?

Thanks for any advice.

Try this variation of your macro:

With ActiveSheet.Range("E1,L1,R1,S1,Z1,AB1,AC1").Entire Column

Then see if it worked.

If it didn't...

If you select that cell, what do you see in the formulabar?

Do you see 9212 or do you see $9,212.00?

I'm betting that you don't see 9212. I'm betting that the value in that cell is
really text.

Run the macro, then try selecting that cell and then click F2, followed by
enter.



David wrote:
>
> I've got some data in the format:
>
> $9,212.00
>
> I want it to show as
>
> 9212.00
>
> I've tried using this:
>
> With ActiveSheet.Columns("E", "L", "R", "S", "Z", "AB", "AC")
> .NumberFormat = "0.00"
> End With
>
> In the relevant columns but it's not working, the figures still show
> in their original format, what did I do wrong?
>
> Thanks for any advice.

--

Dave Peterson

Try this variation of your macro:

With ActiveSheet.Range("E1,L1,R1,S1,Z1,AB1,AC1").Entire Column

Then see if it worked.

If it didn't...

If you select that cell, what do you see in the formulabar?

Do you see 9212 or do you see $9,212.00?

I'm betting that you don't see 9212. I'm betting that the value in that cell is
really text.

Run the macro, then try selecting that cell and then click F2, followed by
enter.



David wrote:
>
> I've got some data in the format:
>
> $9,212.00
>
> I want it to show as
>
> 9212.00
>
> I've tried using this:
>
> With ActiveSheet.Columns("E", "L", "R", "S", "Z", "AB", "AC")
> .NumberFormat = "0.00"
> End With
>
> In the relevant columns but it's not working, the figures still show
> in their original format, what did I do wrong?
>
> Thanks for any advice.

--

Dave Peterson

Could be the "numbers" you're trying to reformat are actually TEXT, rather
than formatted actual numbers.

Vaya Con Dios,
Chuck, CABGx3



"David" wrote:

> I've got some data in the format:
>
> $9,212.00
>
> I want it to show as
>
> 9212.00
>
> I've tried using this:
>
> With ActiveSheet.Columns("E", "L", "R", "S", "Z", "AB", "AC")
> .NumberFormat = "0.00"
> End With
>
> In the relevant columns but it's not working, the figures still show
> in their original format, what did I do wrong?
>
> Thanks for any advice.
>