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 votes181 views1 answer
Vba low word from Long Integer
VBA
0 vote142 views1 answer
Excel vba disable copy paste
VBA
3 votes143 views1 answer
Vba folderexists
VBA
0 vote158 views1 answer
Vba listbox remove all items
VBA
0 vote194 views1 answer
Vba excel do not recalculate before save
VBA
2 votes139 views1 answer
Vba uppercase first letter of each word
VBA
0 vote170 views1 answer
Excel vba move down to next visible cell
VBA
0 vote162 views1 answer
Columns dont autoresize on program start vb.net
VBA
1 vote154 views1 answer
Export datagridview to excel vb.net
VBA
1 vote158 views1 answer
Vb.net get name by Selection Changed
VBA