Hi Barry,
OK, I downloaded the workbook to give it a try. Nice job.
I did, however, get the same error referred to above with the line
objCmt.Shape.TextFrame.Characters.Font.Size = Me.lbo_FontSize
on the first use of the form.
If you hard-code a value the routine works the first time too. This prompted me to step-through the code and discover that "lbo_FontSize" is actually equal to "" on the first pass. Now I'm not exactly sure why the Value property isn't set the first time, even though you have stipulated the ListIndex value, but using the ListIndex instead seems to solve the issue. Like this
objCmt.Shape.TextFrame.Characters.Font.Size = Me.lbo_FontSize.List(Me.lbo_FontSize.ListIndex)
HTH