• Home
 · 
• Databases/Data Access/DAO/ADO
 · 
• Open Microsoft Word

Open Microsoft Word

Open Microsoft Word

Rate Open Microsoft Word

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'7-20-04

Option Explicit

Private Sub cmdWord_Click()
    Dim pintID As Long
    pintID = Shell("C:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE", vbHide)
    
End Sub
'opens an exe files and hides it-change the directory to any you perfer