查找替换的问题

13907933959

网友好！

看是否是这个意思？

Sub 对未设大纲级别的文档自动设置()
    With ActiveDocument.Content.Find
        .Replacement.Style = wdStyleHeading8
        .Execute "[○一二三四五六七八九十]、", , , 1, , , , , , "^&", 2
    End With
End Sub

13907933959

删除、多回了一个。

weiyingde

13907933959 发表于 2017-4-9 07:46
删除、多回了一个。

是的，谢谢你。这方面你是前辈，向你学习。

13907933959

weiyingde 发表于 2017-4-9 08:24
是的，谢谢你。这方面你是前辈，向你学习。

网友好！
您过谦了！实在惭愧、我连菜鸟都还不够格，您的水平远在我之上！您能用得上就好，我能体会来论坛求助人的经历，因我也经常在论坛上求助，有幸得到过多位前辈的帮助，从他们那里学到了帮助他人这个美德，毕竟没有一个人，能把世上所有的技能都学会、学精，如用自已的一技之长，能帮别人度过一时的难关，是一个行善之举，也是一件快乐之事！希望在这个论坛上有一股 “人人帮我，我帮人人，互帮互助，相互提高” 的正能量传递！

weiyingde

13907933959 发表于 2017-4-9 08:59
网友好！
您过谦了！实在惭愧、我连菜鸟都还不够格，您的水平远在我之上！您能用得上就好，我能体会来论 ...

谢谢关注，你学word时间还长吧？我是刚起步，很多的东西还没接触……

13907933959

weiyingde 发表于 2017-4-9 09:56
谢谢关注，你学word时间还长吧？我是刚起步，很多的东西还没接触……

我呀、小白一个，对 word 几乎是零基础，电脑我也是2014年上半年才刚接触，由于读书很少，也没学过英语，汉语拼音…等，到现在除了26个大小写的英文字母免强认得外，一句英语也不会，连打字都不会（用手写板），再加上我学中医，要看、要记的东西特别多，学其它的东西没有时间，所以学 VBA 对我来说，如捞水中月，相当艰难，如今对简单的 VBA 我也只是处在免强会用的阶段，以后还请您多关照！！！

weiyingde

13907933959 发表于 2017-4-9 11:22
我呀、小白一个，对 word 几乎是零基础，电脑我也是2014年上半年才刚接触，由于读书很少，也没学过英语， ...

都差不多，我都50多岁了，13年开始学习VBA，记性衰退，效果较差，只是爱好而已。

weiyingde

jiminyanyan 发表于 2017-4-8 20:57
没用过这个功能．．．．．不知勾选“使用万用字符”在哪里．．．

在百度中搜出这样的文档：
https://wenku.baidu.com/view/f0a0b2dca58da0116c174990.html
其中有这样的语句：
2.在「寻找及取代」对话盒中的「寻找目标」输入「[^1-^127]」，接着点选〔更多〕后，勾选「使用万用字符」，并按下〔全部取代〕。  3.此时可以看到文件中所有半角的英文字、数字及符号，全都删除掉了。 ※由于中文字都是全角，没有半角的，因此不会受影响。  4.不存盘关闭档案并重新开启后，这次在「寻找及取代」对话盒中的「寻找目标」 输入「[!^1-^127]」，并在点选〔更多〕后勾选「使用万用字符」，按下〔全部取代〕。
当然这里的很多说法，好像不是word的叫法，比喻：
1、【编辑】→【取代】。 word中的说法是：查找  替换
2、「」对话盒中的「寻找目标」，也没有这样叫法的标签呀。
单明明写着的是：Word小技巧，着眼的，应该就是以word作为操作平台呀；
但万用字符应该有呀，可查找和替换框中却没有此标签，这到底是什么玩意儿？
费解，茫然！！

13907933959

weiyingde 发表于 2017-4-9 12:22
都差不多，我都50多岁了，13年开始学习VBA，记性衰退，效果较差，只是爱好而已。

向您致敬！

weiyingde

13907933959 发表于 2017-4-9 14:26
向您致敬！

不用客气，一起学习，在这个论坛上是同学兼朋友呀。