I am experienced in Excel VBA but have little experience in Word. I am stuck on a project where I want to print an envelope with a return address. The first line needs to be a different font than the envelope setup font. I can get the array but can't seem to figure out how to change RtnEnvAdd(1) to another font.
idx = 1
.Style = ActiveDocument.Styles("Envelope Return")
Do While .Execute(FindText:="", Forward:=True, Format:=True) = True
For Each Paragraph In .Parent.Paragraphs
RtnEnvAdd(idx) = Selection.Text
idx = idx + 1
This is where I need some code to work with RtnEnvAdd(1)
Any help would be appreciated.