QTP Script to add Underlined text to MS Word document
dim a
set a=createobject("Word.Application")
a.Documents.Add
a.visible=true
a.selection.font.size=20
a.selection.font.name="Times New Roman"
a.Selection.Font.Underline = 1
a.Selection.TypeText"HELLOOO"
a.ActiveDocument.Saveas"C:\qtp.doc"
Showing posts with label VB Script to add Underlined text to MS Word document. Show all posts
Showing posts with label VB Script to add Underlined text to MS Word document. Show all posts
QTP Script to add Underlined text to MS Word document-VB Script to add Underlined text to MS Word document
Subscribe to:
Posts (Atom)
