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 vote232 views1 answer
Excel vba chrw max value
VBA
0 vote242 views1 answer
Find days in month vba
VBA
0 vote223 views1 answer
Do until vb.net
VBA
0 vote185 views1 answer
Excel vba arrondir
VBA
0 vote184 views1 answer
How to sort datagridview in vb.net
VBA
1 vote231 views1 answer
Excel vba make cell visible
VBA
0 vote306 views1 answer
Application.ExecutablePath VB.NET
VBA
0 vote244 views1 answer
Excel vba textbox forecolor disabled
VBA
1 vote236 views1 answer
Vba date to unix timestamp
VBA
0 vote221 views1 answer
Excel vba concatenate range
VBA