Vba word open document read only

Sub OpenWord()
Dim WordApp As Object
Dim WordDoc As Object

Set WordApp = CreateObject("Word.Application")
Set WordDoc = WordApp.Documents.Open(Filename:="C:\test\test.doc", ReadOnly:=True)
WordApp.Visible = True

'do your stuff

Set WordDoc = Nothing
Set WordApp = Nothing
End Sub

Source: vbaexpress.com

Similar codes

0 vote120 views1 answer
Vba get text file content
VBA
0 vote115 views1 answer
Excel vba hide columns
VBA
0 vote118 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote147 views1 answer
Excel vba protect shapes
VBA
0 vote106 views2 answers
Excel vba copy paste after last row
VBA
0 vote182 views1 answer
Find the name of the last excel sheet vb
VBA
5 votes145 views1 answer
Excel vba last byte from INTEGER
VBA
4 votes122 views2 answers
Vba create folder if not exist
VBA
0 vote168 views1 answer
Excel vba protect content
VBA
5 votes98 views1 answer
Vba array worksheet.index
VBA