The new code will work under ANY case. I originally solved the problem as
you posted it.
"Nicolas Cage" wrote:
>
> "Joel" <Joel@discussions.microsoft.com> ha scritto nel messaggio
> news:5CE7A700-3F94-4BFF-9493-11669A3B9511@microsoft.com...
> > Sub test()
> >
> > MyNumber = "100.000,00"
> > location_period = InStr(MyNumber, ".")
> > location_comma = InStr(MyNumber, ",")
> > If location_comma > location_period Then
> > MyNumber = Replace(MyNumber, ".", ";")
> > MyNumber = Replace(MyNumber, ",", ".")
> > MyNumber = Replace(MyNumber, ";", ",")
> >
> > End If
> >
> Not correct, if number is "100,000,00" ?
>
>
>