找不到 Mkdir 运行时错误 76 路径的问题

Question

我正在尝试使用从单词表中检索到的变量创建一个文件夹。 我有 3 个变量，value2、value3 和 value4。 Value2 是“Jonhattan”，value3 是“Smith Sun”，value4 是“123546”。 我为文件夹创建了一个名称作为 3 个变量的组合。

当我尝试使用这 3 个名称创建目录时，它给了我

运行时错误 76

但它允许我创建唯一的变量1。 我认为问题可能是我检索这 3 个值的方式。

   value2 = value1(1)

value3 = value1(2) & " " & Left(value1(3), Len(value1(3)) - 1)

value4 = Left(ThirdTable.Rows(11).Cells(2).Range.text,Len(ThirdTable.Rows(11).Cells(2).Range.text) - 1)

myPath = ActiveDocument.FullName
CurrentFolder = ActiveDocument.Path & "\"
FileName = value2 & "," & value3
xfullpath = CurrentFolder & FileName

MkDir xfullpath here

Answer 1

问题原因

MS Word 表格单元格文本以两个不可见字符结尾，表示单元格结束：

ASCII 7 - Bell
ASCII 13 - Carriage Return

解决方案

您应该通过阅读所有内容来考虑它，除了最后两个字符。 在您的代码中，您应该修改以下几行：

value3 = value1(2) & " " & Left(value1(3), Len(value1(3)) - 1)
value4 = Left(ThirdTable.Rows(11).Cells(2).Range.text,Len(ThirdTable.Rows(11).Cells(2).Range.text) - 1)

到以下几行：

value3 = value1(2) & " " & Left(value1(3), Len(value1(3)) - 2)
value4 = Left(ThirdTable.Rows(11).Cells(2).Range.text,Len(ThirdTable.Rows(11).Cells(2).Range.text) - 2)