Benutzerdefinfierter Typ nicht definiert ???

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 enShellExecuteShowCmd) As Long

Sub PDF_Drucken()
Dim Product As String
Product = "W:\rechnung_pdf\Kontrolle der Datensicherung.pdf"
ShellExecute 0, "Print", Product, "", "", SW_HIDE
End Sub


aber was ist daran falsch? Bekomme immer Fehlermeldung bei Function.

Danke 

Gruß

marcl