If Dir(Pub_PathFile & "\复用距离") <> "" Then
     FilePath = Pub_PathFile & "\复用距离"
     
  Else
    MkDir (Pub_PathFile & "\复用距离")
    FilePath = Pub_PathFile & "\复用距离"
  End If

想在Pub_PathFile=E:\距离 文件夹中建立“复用距离”文件夹
先判断E:\距离目录下是否存在“复用距离”文件夹可是 明明存在 “复用距离”文件夹 为什么
还执行Else呢？即dir判断不存在“复用距离”文件夹？为什么？那出错了