【段落交换】乡长和村长打架了，还有亲属，请给他们排排序。

文人慕

ming0018 发表于 2019-11-27 14:42
请问 是不是只交换上图村长区域和乡长区域的 段落？

是的  交换这些区域  

tcdatongye

查找：(【村长】[!【]{1,})(【乡长】[!【]{1,}) 替换： \2\1

文人慕

tcdatongye 发表于 2019-11-27 15:59
查找：(【村长】[!【]{1,})(【乡长】[!【]{1,}) 替换： \2\1

你好，这个方法好像不可以的。请参考8楼的文件。

tcdatongye

文人慕 发表于 2019-12-11 13:33
你好，这个方法好像不可以的。请参考8楼的文件。

1、光标在首行，2、要勾选使用通配符

文人慕

tcdatongye 发表于 2019-12-11 14:47
1、光标在首行，2、要勾选使用通配符

我这边试了一下    还是没有成功    不确定什么原因

tcdatongye

C:\Documents and Settings\Administrator\桌面\未命名.JPG

文人慕

tcdatongye 发表于 2019-12-13 15:51

我这边也是定位在首行，并且勾选了通配符，仍然不成功，不确定什么原因。

tcdatongye

1. Sub 替换()
   
2.   Selection.StartOf unit:=wdStory
   
3.   With Selection.Find
   
4.     .Forward = True
   
5.     .MatchWildcards = True
   
6.     .Wrap = wdFindStop
   
7.     .Text = "(【村长】[!【]{1,})(【乡长】[!【]{1,})"
   
8.     Do While .Execute
   
9.     .Replacement.Text = "\2\1"
   
10.     .Execute Replace:=wdReplaceAll
    
11.     Loop
    
12.   End With
    
13. End Sub

复制代码

cont

我这里Word2007用通配符也是成功的。
@文人慕，你的Word有问题。