选择并标记word文档中的特定格式

Question

需要将DOC文件导出到TXT然后重新导入它而不会丢失粗体和下划线格式我需要一个宏来执行此操作。

我的想法是选择粗体中的每组单词（可以是句子中的句子或单个单词）然后在其前面写<$>，在它之后写<$$>。当回到单词时，反向应该发生，即<$>和<$$>之间的所有文本都回到粗体。相同的宏适用于下划线和粗体+下划线。我尝试将doc导出到html，然后在html编辑器中打开并另存为txt，只保存粗体和下划线标签。完美，如果没有编辑器放在每一行末尾的CR LF ......

TIA，我的宏观编程技巧缺乏基础...

阿尔贝托

Answer 1

您能否为您处理的原始文件和文件提供一些示例文档？如果它只是关于CR和LF，你可以通过VBA替换它们：

textasstring =替换$（textasstring，vbCrLf，“”） textasstring =替换$（textasstring，vbLf，“”）

另一个解决方案是采用一个能够支持扩展搜索和替换的编辑器，包括\ r和\ n，如notepad ++。