保存电子表格时删除特殊字符

Question

我找到了VBA代码。问题是我需要保存的列带有特殊字符，因此VBA无法保存我的文件。

例如：而abcde列...具有特定数据
上校Q将有约翰/母鹿

由于特殊字符，该代码无法保存。

我希望VBA将列Q的过滤数据保存为路径

“鸣谢John Doe，2019年11月”

'image_2.png'

Answer 1

我相信您在这一行抓住了这个名字：

Dsheet.Name = CStr(Fsheet.Cells(iRow, iCol).Value)

稍后将其用作文件名。 您可以使用VBA Replace()函数清除文件名中的禁止字符：

Dsheet.Name = Replace(CStr(Fsheet.Cells(iRow, iCol).Value),"/","_")