尝试创建文件夹路径时，在VBA拆分函数中键入不匹配错误

Question

我正在尝试根据工作表中列中的路径创建文件夹。我已经通过StackOverflow并修改了一些我发现的符合我需求的代码。

我遇到的问题是，当strPath范围设置为单个单元格（即E2）时，它可以正常工作，但当我将其设置为我需要的列范围时，我得到类型不匹配错误{{ 1}}就行：(E2:E57)

我仍然是VBA的新手，虽然我查看了Microsoft文档并在此处搜索了答案，但我很遗憾。

谢谢！

"For Each elm In Split(strPath, "\")".

Answer 1

MkDir将立即创建新文件夹和子文件夹。无需循环文件夹结构。

dim rng as range
on error resume next
for each rng in Sheet1.Range("E2:E57")
    MkDir rng.value2
next rng
on error goto 0