Tengo que abrir un archivo de word en una aplicacion, el codigo es el siguiente:

Private Sub Label4_Click()
Shell ("C:\Uso de herramientas manuales.doc")
End Sub

y me aparece el siguiente error:

Run-Time error "5":

Invalid procedure call or argument



Ayuda por favor

el shell se usa para abrir ejecutables por ejemplo:

shell "c:\ejemplo.exe",VbNormalnoFocus

pero si queres abrir cualquier archivo .doc,.pdf etc con su programa que lo gestiona entonces pone esto:

pone un boton en el form:

primero declaras la api y despues el codigo del boton.

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "c:\Uso de herramientas manuales.doc", "", "", 4
End Sub

Edited by: seba123neo

funco super bien, muchas gracias