替换Excel VBA中的特殊字符并添加列

我对Excel VBA宏非常陌生，因为我的工作要求一些具有挑战性的东西。为了给大家一个简短的介绍，我每天都会收到一个文件，其中我必须从a列中找到所有特殊字符（@*（）+[]\：；“，./？）。添加三列C、D和E，这三列应自动填充值，即C列应填充“XYZ”，D列为“ABC”，E列为“NA”。应在添加到最后一个数据行的新列中复制相同的值

我确实创建了一些用于删除特殊字符（双引号（“）除外）的东西。此外，我没有找到将文件保存为EXE的方法，即当单击时发现Excel工作簿以其名称打开并执行此函数

如果有人能帮我写这段代码，我将不胜感激。我对VBA编程非常幼稚。如果这行得通，将对我的日常工作管理有很大帮助

谢谢你的帮助

谢谢， 阿克什

---

请在此处查看类似的内容：

也可以尝试删除双引号：

myVariable = Replace(myVariable, Chr(34), "")

---

您可以将工作簿的内容复制并粘贴到启用宏的工作簿中，而不是创建一个可执行文件。

现在，我正在尝试做两件事。我能够创建一个与我的要求类似的代码，并且部分有效。谢谢！现在，我正在尝试连接两列的值，但使用以下代码，c在Excel表格的最后一个单元格前加上“-”号。如有任何建议，将不胜感激。只要lngLastRow=Cells（Rows.Count，“a”）。End（xlDown）。Row Range（“A2:a”和lngLastRow）。Value=Evaluate（=G2:G”和lngLastRow&“-&”和“B2:B”和lngLastRow）

myVariable = Replace(myVariable, Chr(34), "")