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 votes131 views1 answer
Excel vba check if key is in collection
VBA
0 vote127 views1 answer
Excel vba chrw max value
VBA
0 vote166 views1 answer
Check if cell is dbnullvb.net
VBA
0 vote128 views2 answers
Delete all controls from list of control vb.net
VBA
0 vote125 views1 answer
Vba len variant
VBA
0 vote135 views1 answer
Menus act like radio buttons vb.net
VBA
0 vote155 views1 answer
Search for text in every worksheet excel visual basic
VBA
0 vote129 views1 answer
Hello world vb.net
VBA
0 vote117 views1 answer
Vba dropdown event
VBA
0 vote143 views1 answer
Vbnet click on dgv cells
VBA