我可以添加IF语句来查找文件夹是否存在吗？

Question

我需要基于Mgr = Data(I,2)值和Last = Data(I,1)值变量搜索文件夹。我已经在某个路径中创建了所有文件夹。我将如何编辑它：

wb.SaveCopyAs ThisWorkbook.Path & Application.PathSeparator & _
          ValidFileName(Mgr & "_" & Last & "_General Assessment.xlsx")

，以便它在文件夹路径中搜索Mgr变量（经理名称），然后搜索Last变量（员工名称），然后将文件保存在其中？我不希望它保存在已启用宏的wb保存的文件夹路径中，而是在另一个路径中查找合适的文件夹。

其余代码：

  For i = 1 To UBound(Data)
    If Data(i, 1) <> Last Then
      If i > 1 Then
        Dest.Select
        wb.SaveCopyAs ThisWorkbook.Path & Application.PathSeparator & _
          ValidFileName(Mgr & "_" & Last & "_General Assessment.xlsx")

      End If
      Dest.Resize(, Columns.Count - Dest.Column).EntireColumn.ClearContents
      Last = Data(i, 1)
      Mgr = Data(i, 2)
      j = 0
    End If
    a = 0
    For k = 1 To UBound(Data, 2)
      Dest.Offset(a, j) = Data(i, k)
      a = a + 1
    Next
    j = j + 1
  Next

   SaveCopy wb, Last, Mgr '<< save the last report