If you want to get around this, you can do the following:
In cell A1, put '123456 with a' '' in front. Then write
range("A1").Characters(1,3).Font.Bold = true
Only the first three numbers are required, not taking into account the "" sign. So the number looks like a string, but you can still use its calculations, for example. A1 + 4 will give 123460.
source share