Hmm que raro
Yo lo probé y funciona correctamente
Tal vez sea un tema de configuracion regioanl, no se
Yo tengo como separador de miles "," (coma) y como simbolo decimal "." (punto)
Lo probe asi tambien y funciona (incluso independientemente dle formato que tenga la celda... numero, texto, etc)
Código:
Sub Mostrar()
Dim sTxt As String
sTxt = Format(Cells(1, 1), "###,#0.00")
MsgBox sTxt
End Sub