Changing Word Font in Vb.net

[hmkaddoura]

Hi All,

Am trying to change the MS word font in my vb.net application by using the following code

Dim sizo As Single = 14
...
doc.ActiveWindow.Selection.SetRange(doc.Paragraphs(1).Range.Start, doc.Paragraphs(app.ActiveDocument.Paragraphs.Count()).Range.End)
                           doc.ActiveWindow.Selection.Font.Bold = 1
                            doc.ActiveWindow.Selection.Font.Name = "Traditional Arabic"
                            doc.ActiveWindow.Selection.Font.Size = sizo

neither font name nor size changes.
when I open again the doc file the font is set to Tohama and size is 8.5

any clue??

Regards,
HK

[hmkaddoura]

any one that can help?