需要幫助刪除 VBA Excel 中的垃圾字符

Question

我正在嘗試以文本格式閱讀 XMl 文件。

Set FS = CreateObject("Scripting.FileSystemObject")
Set TS = FS.OpenTextFile(FilePath, 1, False)
Do While (TS.AtEndOfStream = False)
    s = TS.ReadLine
Loop

但是在閱讀時，即使我嘗試使用修剪但無法刪除它，我也會得到一些顯示方形框的垃圾字符。 請讓我知道如何刪除此字符。

Answer 1

我知道您說您正在以文本形式讀取文件，但由於它是 XML 格式，是否可以使用.xml擴展名保存文件？ 這樣您就可以完全繞過您的問題，只需使用由CreateObject("MSXML2.DOMDocument.6.0")創建的 object ...

---

另一種解決方案（借鑒@Neil 的建議）可能是檢查正在讀入的字符是否等於vbNewline 、 vbCrLf或vbLf字符。 如果它們相等，那么就不要將它們包含在您的數據拉取中。