关于字符转数字规范格式的问题。

LIUZHU

优化了以下，代码还可以更精简，还是JSA

LIUZHU

转换的效果似乎更好一点，数字格式符合财务人员的阅读习惯

grf1973

直接引用18楼成果

ggmmlol

下载免费的文本编辑软件 Notepad++，利用其内置的正则替换功能进行处理，其优点是所见即所得，而且可以撤消和重做。

用它打开文本文件，然后按Ctrl+H快捷键打开其替换对话框，并设置替换功能的选项，如图所示。然后，把光标插入位置定位到数据区域的第一行，进行以下三项替换：
一、千位分隔符错误为小数点的（即该小数点后面紧接字符恰好为3位数字），替换为逗号：
查找内容：\.(?=\d{3}\b)
替换为：,
二、小数点错误为逗号的（即逗号后面紧接字符恰好为2位数字），替换为小数点：
查找内容：,(?=\d{2}\b)
替换为：.
三、把数值后面紧接的负号，替换到数据之前：
查找内容：([\d,.]+)-
替换为：-$1

下图为完成上述三项替换之后的效果。（当取消“循环查找”时，点“全部替换”，就是从光标位置替换到文件末尾。所以，把光标定位到数据区域的第一行，可以避免把表头部分的日期中的负号误处理）

ovxyz

LIUZHU 发表于 2023-2-27 09:04
优化了以下，代码还可以更精简，还是JSA

大大，这段代码感觉是通用性较强，不影响其他字段，且比较简洁的，能帮我写成vba吗？