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 votes256 views2 answers
Excel vba if sunday or staurday
VBA
25 votes574 views3 answers
String to date vb
VBA
0 vote220 views1 answer
Vba file size
VBA
5 votes258 views1 answer
Excel vba second byte from INTEGER
VBA
0 vote258 views1 answer
Columns dont autoresize on program start vb.net
VBA
0 vote244 views1 answer
Not allow form to be resized
VBA
4 votes230 views2 answers
Vba array length
VBA
0 vote238 views1 answer
String contins in vba
VBA
0 vote236 views1 answer
Internet explorer reference vba
VBA
4 votes253 views1 answer
Excel vba Imitating the "IN" operator from python
VBA