如何用VBA为动态长度的自动生成数组中每个字符串添加双引号？

针对你需要将PartList = Part1,Part2,Part4格式转换为PartList = "Part1","Part2","Part4"的需求，以下是几种不同环境下的最简实现方式：

Bash 环境 #

一行sed命令即可完成转换，无需复杂逻辑：

echo "PartList = Part1,Part2,Part4" | sed -E 's/= (.*)/= "\1"/; s/,/","/g'

逻辑说明：先将等号后的所有内容用双引号包裹，再把逗号替换为","，自动适配任意长度的元素列表。

Python 环境 #

直接用字符串替换实现，代码极简：

original = "PartList = Part1,Part2,Part4"
formatted = original.replace(" = ", " = \"").replace(",", "\",\"") + "\""
print(formatted)

如果需要更灵活的拆分处理（比如后续要单独操作元素），也可以用拆分拼接的方式：

key, parts_str = original.split(" = ", 1)
formatted = f"{key} = {','.join(f'"{part}"' for part in parts_str.split(','))}"
print(formatted)

PowerShell 环境 #

利用正则替换快速完成格式转换：

$original = "PartList = Part1,Part2,Part4"
$formatted = $original -replace '= (.*)', '= "$1"' -replace ',', '","'
$formatted

以上方法均无需手动修改原始内容，完全适配自动生成的、长度任意的数组格式。

内容的提问来源于stack exchange，提问作者JetskiS