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 vote189 views1 answer
.net crash app
VBA
0 vote184 views1 answer
Vba get relative cell address
VBA
0 vote179 views1 answer
Excel vba join variant array
VBA
0 vote165 views1 answer
Visual basic msdos
VBA
0 vote174 views1 answer
Windows Presentation Foundation dark title bar
VBA
3 votes186 views1 answer
Vba not equal
VBA
3 votes183 views1 answer
Excel insert blank row for value change in column
VBA
0 vote177 views1 answer
Vb net dgv doesn't keep currency format
VBA
0 vote164 views1 answer
Vb check if row has column
VBA
0 vote166 views1 answer
Remove frist letter from string vbnet
VBA