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

1 vote314 views1 answer
Vba date to unix timestamp
VBA
1 vote323 views1 answer
Set font for ms chart vb.net
VBA
1 vote323 views1 answer
Vba format string as cash
VBA
0 vote303 views1 answer
Vba dictionary clear
VBA
0 vote319 views1 answer
Change form background image vb
VBA
-1 vote324 views1 answer
VBA check if a cell contains a letter or string
VBA
0 vote323 views1 answer
Excel vba DisplayAlerts
VBA
0 vote318 views2 answers
Excel vba copy paste after last row
VBA
8 votes360 views1 answer
Vba make integer
VBA
0 vote353 views1 answer
Application.ExecutablePath VB.NET
VBA