PDF-Datei öffnen

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

Sub aufrufen()
ShellExecute Application.hwnd, "Open", UserForm3.ListBox4, _
vbNullString, vbNullString, vbNormalFocus
End Sub
PDF-Dateien aufrufen können. Leider funktioniert der Code nicht mehr auf MAC. Hat jemand eine alternative?

Vielen Dank und viele Grüße

Lars