VBA 幻灯片。如何获取文件的当前目录路径到 VBA 中的字符串？

Question

VBA 幻灯片。如何设置环境当前目录？

我也试过这个代码:

Sub test()
Dim sPath As String
sPath = ActiveWorkbook.Path
MsgBox sPath
End Sub

而是说: Object required
请帮我让它工作......

Answer 1

蒂姆已经给出了答案。你可以使用类似的东西:

Sub test()
    Dim sPath As String
    sPath = ActivePresentation.Path
    If Len(sPath) > 0 Then
        MsgBox ActivePresentation.Name & vbNewLine & "saved under" & vbNewLine & sPath
    Else
        MsgBox "File not saved"
    End If
End Sub