VBA访问-如果尚未在字符串中的每个逗号后插入空格？

Question

我想标准化地址。

例如：魁北克（qc），某些街道1234，g1g 1g1

我尝试过将Instr（MyStr，“，”）与替换功能结合使用

它在没有空间的情况下确实可以工作，但是在已经有一个空间的情况下放一个双倍的空间。我还想确保对字符串中的所有逗号都执行此操作

请帮助我！

Answer 1

应该是一个表中的4个字段。将它们连接到查询中

Select Trim(zipcode) & ", " & Trim(street) & ", " & Trim(city) & ", " & Trim(whateverTheFourthValueRepresents) As StandardAdress From Table

对于表中的仅一个字段，首先将所有正确的逗号/空白替换为仅逗号，然后将逗号替换为逗号/空白。也许您也需要用单个空格代替两个空格。

Replace(Replace(MyStr, ", ", ","), ",", ", ")