This worked for me

With Range("A1")
..NumberFormat = "_(* #,##0_);_(* (#,##0);_(* ""-""??_);_(@_)"
End With

make sure you correct any NG linewrap

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Stuart" wrote in message
...
The following is copied from google, but errors in red when I paste it
into
a module:

.NumberFormat = "_(* #,##0_);_(* (#,##0);_(* ""-
""??_);_(@_)"

Can you tell what it should be, please?

Regards