Need fix for thousand seperator from decimal to comma retaining last decimal

It looks like that code is creating a TEXT string
And the text string is being entered in the cell as Text, not as a number..

Try changing this line
myCell.Value = myStr
to
myCell.Value = Val(myStr)


If that doesn't help, can you post a sample book?