エクセルVBAで働く障害が発生した細かい

Question

（ExcelおよびMac用パワーポイント2011）

私はパワーポイントを開き、マクロを実行し、Excelのマクロを持っています。 私はパワーポイントのマクロを実行すると、直接それが正常に動作しますが、私はエクセルマクロ呼び出しからそれを実行した場合、それは「68」実行時エラーで失敗します。

Dim strfilee As String 


mydir = ":tmp" 
strpath = mydir & ":" 
strfilee = Dir(strpath) <--- Failing on this line 


''''Loop through each file in the folder to find the one with the OS parameters 

    i = 0 

    Do While Len(strfilee) > 0 
    cellplace = "A" & i 

     If Right(strfilee, 11) = "params.pptx" Then 
     lspace = InStr(1, strfilee, "_", vbTextCompare) 
     target_name = Trim(Left(strfilee, lspace - 1)) 
     sc_file_name = "tmp" & ":" & strfilee 

       With ActivePresentation 
        number_slides = .Slides(.Slides.Count).SlideNumber 
        End With 
       ActivePresentation.Slides.InsertFromFile sc_file_name, number_slides 


     End If 
     strfilee = Dir 
     i = i + 1 

    Loop 

Answer 1

：

それは、このループの前にあります使用できないデバイス

Dir機能を使用する場合は、完全修飾パスを使用してください。