Question

如何批量删除文本框中的换行符

一个100页的PPT，每个页面都有多个非空文本框，每个文本框后面都有一个换行符，文本框看起来就多了一行。现在想要一次性删掉这个换行符，VBA怎么实现？*注：word里面有通配符替换功能可实现，把文档中的^p全部替换为空。

Answer 1

如图所示，用鼠标拖选，可以看到，文字后面有一个半角空格，还有一个换行符。每个文本框都是这样的，如何批量删除？

Answer 2

先给个思路：1、遍历所有幻灯片2、遍历所有图形形状3、判断图形形状是否文本框4、当前文本框的是否有文本5、遍历所有文本的每一个字符6、如果字符是“空格”或者是“空行”则删除好像空格的字符用chr(32)，空行的字符用什么代表？在测试中。 查看原帖>>