一、课程介绍：

 ▲ CurrentProject.Path 
    - 当前文件所在的文件夹

 ▲ Dir函数 
    - 表示一个文件名、目录名或文件夹名称。
    - 示例代码：
    If Dir("D:\Access微课\采购明细.xlsx") = "" Then
        MsgBox "【采购明细.xlsx】文件不存在，" & vbNewLine & "请检查当前文件夹下是否存在此文件！", vbCritical, "提示"
        Exit Sub
    End If

二、扫码听课：

三、电脑学习：

    请点击网址：https://m.qlchat.com/wechat/page/live/840000166145996 （点开后需要用微信扫描登录）