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

2 votes272 views2 answers
Constructor vb.net
VBA
0 vote290 views1 answer
Vba compare strings
VBA
1 vote260 views1 answer
Excel vba hide zero values
VBA
0 vote289 views1 answer
Excel vba disable keyboard input
VBA
0 vote298 views1 answer
Nested if else in vb.net
VBA
0 vote284 views1 answer
Thread sleep vb
VBA
0 vote294 views1 answer
Vba horizontalalignment
VBA
15 votes383 views1 answer
Excel vba wait
VBA
0 vote306 views1 answer
Excel vba Column Name from Column Number
VBA
11 votes397 views1 answer
Excel vba How to URL encode a string
VBA