Application.FollowHyperlink Fehlermeldung

[StefKe]

Hallochen allerseits, falls der Benutzer die Inputbox abbricht soll die gespeicherte Datei geöffnet werden. Leider erscheint an diesem Punkt eine Fehlermeldung.

Code: [Auswählen]

Sub SpeichernUndDrucken()

Dim strPfad As String
Dim strKopie As String
Dim intRgNr

intRgNr = 23

strPfad = "C:\Users\Stefan\Desktop\" & intRgNr & ".pdf"
    Application.DisplayAlerts = False
        Worksheets("Tabelle1").ExportAsFixedFormat Type:=xlTypePDF, Filename:=strPfad, Quality:=xlQualityStandard, _
         IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
    Application.DisplayAlerts = True
   
 'InputBox anzeigen:     
    strKopie = InputBox("Wieviel Kopien Drucken?", "Druckmenge", "...bitte die Stückzahle eingeben")
    If strKopie = "" Or strKopie = "...bitte die Stückzahle eingeben" Then
    Application.FollowHyperlink (strPfad) 'Hier erscheint die Fehlermeldung, hatt vermutlich was mit "" :-(
    Else
    Exit Sub
    End If
End Sub
FollowHyperlink erkennt den Link nicht.
strPfad = "" & strPfad & "" macht auch keinen Sinn...wie ist das Problem zu lösen?

Danke!
Stefan

Hab den Fehler grad gefunden:

Application.FollowHyperlink (strPfad) = Falsch
ThisWorkbook.FollowHyperlink (strPfad) = Richtig....