Add the word ERROR in the 133rd position after a string of characters in a cell

I want to use VB to add the word ERROR after the end of a string in a cell. The E in ERROR should start in the 133rd character position of the cell. I want to do this for multiple cells with strings of varying lengths and I don't want to disturb the original string.

Positions and strings
.................................1
.................................3
1 2 3..........................3
string value one............ERROR
string value two............ERROR
string value three..........ERROR
string value four............ERROR

Hopefully I've provided enough information. Thanks.