Word录制宏后，让宏对字体的颜色更改为蓝色、无法保存

413191246se

楼主：
    一、在 VBE 中，你向左上角看，是不是有 NewMacros 被选中（蓝色）？在它上面有“窗体”文件夹，点击它，会显示出 ColorFontSize，双击它，会显示出窗体来，在窗体上双击“开始查找”按钮，就看到了代码窗口。在这段代码中，下面有四个共2组前后书名号，改动它们就可以了（英文双引号不要动。另外，有这个宏/窗体，已不必再使用《通用》那个宏了）！
    二、是否要插入到这些符号之外？
    三、首尾符号宏：输入框要求输入符号，你只须键入想找到的符号即可，不必在代码中修改。
    四、三组 IF 语句，你只须在不想让它运行的 IF 语句前面加个撇号（'）注释掉即可，不必删除。
楼主还是没给我具体样例，因我不甚明了你的要求，所以感觉模棱两可。

13907933959

413191246se 发表于 2015-7-5 10:34
楼主：
    一、在 VBE 中，你向左上角看，是不是有 NewMacros 被选中（蓝色）？在它上面有“窗体”文件夹 ...

师傅好！
一、那个 ColorFontSize窗体默认插入符号的更改只能在那一处更改吗？能不能弄成直接在VBE窗口看到代码更改那种？
二、这个Sub 首尾符号()的宏，按你教我的方法也运成不了，提示“运成错误 '91'对象变量式Witn块变量未设置”
三、师傅、“具体样例”我以使出了浑身的解术，由于我文字水平有限，再也说不明白了，还是请师傅把Sub 全文查找_红色宋体小二_前后添加书名号_通用() 这个宏，在199楼的例文上，宏中设置成“楷体”“黑色”“全文查找”运行这个宏，就会看到……
再把Sub 全文查找_红色宋体小二_前后添加书名号_通用() 这个宏内插入符号更换为＼X，在199楼的例文上，宏中设置成“楷体”“黑色”“全文查找”运行这个宏，就会看到：

1、文字内有其它符号时，如：［］、＼X、插入的符号会插入到符号内。如：原来文档内有直括号的地方［××××］，插入符号《》后会变成这样［《××××》］。或原来文档内有＼X号的地方＼X××××＼X，插入符号《》后会变成这样＼X《××××》＼X。

2、文字内有其它符号时，如：［］、＼X、后插入的符号会插入到该符号内。如：原来文档内有直括号的地方［××××］，插入符号＼X后会变成这样［＼X××××＼X］。

3、原文档内有＼X号的地方＼X××××＼X，插入符号＼X后会变成这样＼X＼X××××＼X＼X＼X。即前面会插入一个＼X，后面会插入2个＼X。

我的意思：
1、能不能设计成在一行文字中间碰到类似这样两边有符号（如：［］、＼X）的地方不插入符号（无论符号内外都不插入）。有相同符号的地方不插入，如有＼X的地方不再插入＼X。

2、在执行单行插入符号时在其它的符号外面插入（而不是插在符号内）。有相同符号的地方不插入，如有＼X的地方不再插入＼X。

413191246se

楼主，找到窗体 ColorFontSize 后，在其上点击右键选择“查看代码”即可，平时录制宏都是存放在 NewMacros 模块，现在你要在 VBE 中查看窗体模块的代码，可如此查看。
另外，《首尾符号》宏显示错误，你退出 VBE，然后按 Alt + F8 查看一下是否有两个《首尾符号》宏，如果有，删除一个；如果不是这个问题，就删除此宏重新拷贝一下该宏原始文本。
***现在的问题是：我被你一会儿《首尾符号》宏，一会儿《颜色字号字体》宏，给弄懵了！
你说让我看你运行宏后的结果，但我也未明了你想要什么？
如：“1、能不能设计成在一行文字中间碰到类似这样两边有符号（如：［］、＼X）的地方不插入符号”，这个符号，到底是书名号那个宏的书名号，还是“[]\x“这些符号？——我现在不知道到底你说的是哪个宏？
***建议楼主重新提一个问题，不要同时提很多，你提供一下例句（文字长度不一定要多，但是要说明白），格式如下：
问题：AAA
目标：BBB（必要时用颜色标色，给我具体样例）

13907933959

413191246se 发表于 2015-7-5 21:21
楼主，找到窗体 ColorFontSize 后，在其上点击右键选择“查看代码”即可，平时录制宏都是存放在 NewMacros  ...

师傅好！

一、这个Sub 首尾符号()的宏，按你教我的方法再到183楼重新复制粘贴，还是运成不了（检查了多遍也无2个这个宏），还是提示“运成错误 '91'对象变量式Witn块变量未设置”。

二、下面的问题，都是指Sub 全文查找_红色宋体小二_前后添加书名号_通用() 这一个宏。

1、能不能设计成在一段文字中间碰到类似这样两边有符号（如：［］、＼X）的地方不插入《》（无论符号内外都不插入，如：外面［里面，  里面］外面，都不插入，＼X、斜杠左边，X右边都不插入，）。

有相同符号的地方不插入，如：有＼X的地方不再插入＼X。有［］的地方不再插入［］。

2、在执行单行插入符号时，碰到有其它符号时，在其它符号外面插入，不是插在其它的符号内，如要插入＼X号，文档上原有书号的地方《××××》，要插成这样＼X《××××》＼X，而不是插成这样的《＼X××××＼X》。

有相同符号的地方不插入，如有＼X的地方不再插入＼X，有［］的地方不再插入［］。

413191246se

楼主，按你要求的改了，试试吧！因为长度超过限制，上传文本文件：
test（红小宋）查找.rar (2.33 KB, 下载次数: 4)

2015-7-6 11:23 上传

点击文件名下载附件

13907933959

413191246se 发表于 2015-7-6 11:23
楼主，按你要求的改了，试试吧！因为长度超过限制，上传文本文件：

师傅好！
你这个文本内是一个宏，还是2个宏？
我把文本内所有的都复制粘贴到VBE窗口内，运成是正常，可它没有弹出选项框，功能由多功能，变回只有一种功能了，只能给红色、宋体、小二前后添加书名号。
1、改进了在整个段落文字为红色、宋体、小二时，段落中间有相同符号的地方，它没有插入。
2、但在整个段落文字为其它颜色或字号时，而中间有相同符号《》的地方，如颜色是红色、字号小二，字体为宋体的，它还是插入了。
师傅、我是想在哪个200楼的（最后带窗体的）六合一的功能上改进，不是想要单一的功能。

413191246se

楼主，214楼作废！本楼有效！——要求：进入 VBE，点击 ColorFontSize，右键——移除——不做备份，然后导入最新的 ColorFontSize（下载我的补丁包到某盘根下解压为文件夹，进入文件夹选中 ColorFontSize），然后，退出 VBE，进入 Word 文档窗口，执行《查找 颜色字号字体_前后添加书名号_窗体》这个宏。
补丁： 查找红小宋补丁.rar (4.45 KB, 下载次数: 1)

2015-7-6 18:14 上传

点击文件名下载附件

413191246se

关于《首尾符号》宏出错的问题，看看是不是在 VBE 内，某个宏内包含某个宏，就是 Sub aaa()...End Sub 之间，不许再有 Sub bbb() 或 End Sub 语句。《通用》那个宏，不要再用了，因为它的升级版本是这个《窗体》宏，只须用鼠标点选即可，那个需要输入汉字，弃用吧！

413191246se

窗体宏，前后插入符号（过去叫：前后添加书名号）两个框内，可以输入任意文字/符号，默认是书名号《》，输入：China/Daily 也可以。

13907933959

413191246se 发表于 2015-7-6 18:15
楼主，214楼作废！本楼有效！——要求：进入 VBE，点击 ColorFontSize，右键——移除——不做备份，然后导 ...

师傅好！

那个窗体比以前小了，还增加了换符号的窗口，这比前一个更方便了。可还有几问题还没有解决。

1、新增一个问题，当把该宏设置一宏按钮后，可以正常运行，可窗体不弹出，导致无法点选字体、字号、颜色。

2、只解决了在整个段落文字中间或整行文字中间有相同符号的地方，它没有插入符号。

3、但在整个段落文字开头和结尾或整行文字开头和和结尾有相同符号的地方，它还是会插入符号。

4、在整个段落文字或整行文字为其它颜色或字号时，而中间有相同符号《》的地方，如颜色是红色、字号小二，字体为宋体的，它还是插入了符号。