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 vote119 views1 answer
Get month number from month name vbnet
VBA
20 votes164 views1 answer
Excel vba recursive example factorial function
VBA
8 votes152 views1 answer
Vba make integer
VBA
1 vote126 views1 answer
Excel vba force recalculation
VBA
0 vote127 views1 answer
Openfiledialog specific folder
VBA
0 vote119 views1 answer
Vba file size
VBA
0 vote153 views1 answer
Vba registry settings
VBA
0 vote132 views1 answer
Find if year is leap year vb
VBA
0 vote111 views1 answer
Open application from vbnet
VBA
0 vote118 views1 answer
Show unix time in vba
VBA