VBA可实现这种查找替换吗？

相见是缘8

各位老师好！

想把文档中，这种乱和缺失的“功能主治、处方组成、临床疗效、处方来源、按语”等，按正确位置和顺序替换好，那位老师有办法？请参看附件，多谢！

共有2组排序：

1、

【功能主治】

【处方组成】

【临床疗效】

【处方来源】

【按语】   

2、

【功能主治】

【处方组成】

【辨证加减】

【临床疗效】

【处方来源】

【按语】   

hlxue

原文有700多页，还有很多错乱，替换很费时。

相见是缘8

hlxue 发表于 2024-12-22 11:34
原文有700多页，还有很多错乱，替换很费时。

EH 老师好！
是啊！这都是以经过手工整理了几个小时的样子，如继续用手工查找替换整理的话，凭我的技能，半个月都拿不下来，所以发上来，看那位老师有不有办法！

chxw68

把方括号内的关键字整理了一下，你这个文案是扫描生成的吧？错别字太多了，你有用吗？

相见是缘8

chxw68 发表于 2024-12-23 20:12
把方括号内的关键字整理了一下，你这个文案是扫描生成的吧？错别字太多了，你有用吗？

chxw68老师好！

感谢出手相助！这个是PDF扫描生成的。不知啥原因？代码在我这的“附件”上运行不了，请指教！

chxw68

相见是缘8 发表于 2024-12-24 09:33
chxw68老师好！感谢出手相助！这个是PDF扫描生成的。不知啥原因？代码在我这的“附件”上运行不了，请指 ...

代码用不成，运行几个小时都结束不了，我用查找替换做的，WORD的查找替换功能非常强大，我也是才学习。