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 vote128 views1 answer
Change form background image vb
VBA
0 vote119 views1 answer
Vba collection key list
VBA
0 vote135 views1 answer
Add text to Shape VBA
VBA
0 vote149 views1 answer
Vba cell all borders
VBA
6 votes136 views1 answer
Excel vba check if a string only contains letters
VBA
0 vote121 views1 answer
Vba first line of string
VBA
0 vote133 views1 answer
.net crash app
VBA
0 vote126 views1 answer
Send webhook vbscript
VBA
0 vote141 views1 answer
Vba round to 2 decimals
VBA
0 vote121 views1 answer
Excel vba formatconditions range
VBA