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 vote176 views1 answer
Vb.net visible property dgv collumn not working
VBA
1 vote186 views1 answer
Add a index column power bi
VBA
0 vote191 views1 answer
Enable macros on opening workbook vba
VBA
0 vote174 views1 answer
Replace spaces with underscores vbnet
VBA
0 vote188 views1 answer
Vba excel parser xml
VBA
1 vote168 views1 answer
Vba delete array element
VBA
0 vote175 views1 answer
Vba file size
VBA
3 votes209 views2 answers
Vba date to string
VBA
0 vote178 views1 answer
Vba type
VBA
0 vote181 views1 answer
Excel vba remove formatting from cell
VBA