创建一个带有日期的文件夹

Question

因此，我试图创建一个文件夹，该文件夹的日期取自该单元格上的日期，但问题是该日期包含创建文件夹时无法包含的“ /”字符，如何解决此问题？ ？

mypath = Application.ActiveWorkbook.Path
MkDir mypath & "\" & Worksheets("Sheet 1").Range("D18").Value

我到目前为止所拥有的全部