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

5 votes193 views1 answer
Excel vba second byte from INTEGER
VBA
3 votes186 views1 answer
Vba post request json
VBA
25 votes341 views2 answers
Excel vba folder exist
VBA
0 vote184 views1 answer
Power query M substract minimum value of column -dax
VBA
1 vote168 views1 answer
Vba reverse string
VBA
0 vote168 views1 answer
Vba get text file content
VBA
0 vote155 views1 answer
Vbnet make a string to unicode converter
VBA
0 vote182 views1 answer
Vba loop through textboxes
VBA
0 vote166 views1 answer
Vba code to open a file with login rights
VBA
5 votes197 views1 answer
Vba low byte from INTEGER
VBA