Anyone help me with the below show me where im going wrong???
Error listed below
--------------------------------
Sub all()
Dim wdapp As Object
On Error Resume Next
Set wdapp = GetObject(, "Word.Application")
On Error GoTo 0
If wdapp Is Nothing Then
MsgBox "No instances of Word...