Greg,

After some searching on the net I found that by adding two lines of code to your example makes things work:

Set oRng = .Bookmarks("TestBM").Range
oRng.start = oRng.start
oRng.End = oRng.start + 8
oRng.Text = "Whatever"

I guess this is what you meant by defining a range.