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

问题描述 投票:1回答:1

我正在尝试使用从单词表中检索到的变量创建一个文件夹。我有3个变量,分别是value2,value3和value4。值2是“ Jonhattan”,值3是“ Smith Sun”,值4是“ 123546”。我为文件夹创建了一个名称,其中包含3个变量。

[当我尝试使用这三个名称创建目录时,它给了我

运行时错误76

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

   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
vba ms-word word-vba
1个回答
2
投票

问题原因

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)
© www.soinside.com 2019 - 2024. All rights reserved.