向各位大侠讨教一个word查找替换表达式

shoe12 · 发表于 2023-2-23 08:27

本帖最后由 shoe12 于 2023-2-24 07:32 编辑

如图所示，如何通过通配符表达式查找替换，

将正确答案弄入题中的括号内。括号位置不
固定，答案在题末。

守候_CJ · 发表于 2023-2-23 10:23

Word 通配符替换——批量填写答案

查找：([/(（])[ ]@([\)）][!^13]@^13[!^13]@^13答案\[)([A-F]@)(\])
替换：\1\3\2\3\4
勾选通配符

limonet · 发表于 2023-2-23 11:27

勾选：使用通配符
查找：(（)( )(）*^13*^13*\[)([ABCD])(\])
替换：\1\4\3\4\5

tcdatongye · 发表于 2023-2-23 13:05

Sub aa()
With Selection
  .EndOf wdStory
  Do
j = .MoveEndUntil("[", wdBackward)
If j = 0 Then Exit Do
t = .Text
.MoveEndUntil cset:="（", Count:=wdBackward
.MoveEnd Count:=2
.Text = " " & t
  Loop
End With
End Sub

shoe12 · 发表于 2023-2-23 15:12

守候_CJ 发表于 2023-2-23 10:23
Word 通配符替换——批量填写答案

假如有1-100道题，替换栏该如何修改？

shoe12 · 发表于 2023-2-23 15:18

limonet 发表于 2023-2-23 11:27
勾选：使用通配符
查找：(（)( )(）*^13*^13*\[)([ABCD])(\])
替换：\1\4\3\4\5

接二楼提问，假如有1-80题，替换栏如何写？

shoe12 · 发表于 2023-2-23 15:20

本帖最后由 shoe12 于 2023-2-23 15:34 编辑

tcdatongye 发表于 2023-2-23 13:05
Sub aa()
With Selection
.EndOf wdStory

感谢老师，再进一步问问：假如既有单选又有多选，有办法如何弄吗？

守候_CJ · 发表于 2023-2-23 15:22

shoe12 发表于 2023-2-23 15:12
假如有1-100道题，替换栏该如何修改？

只要每道题的编写结构不变就不用变和多少题无关

守候_CJ · 发表于 2023-2-23 15:24

shoe12 发表于 2023-2-23 15:12
假如有1-100道题，替换栏该如何修改？

如果只替换部分就先选中部分区域再替换

shoe12 · 发表于 2023-2-23 15:32

本帖最后由 shoe12 于 2023-2-23 15:35 编辑

守候_CJ 发表于 2023-2-23 15:24
如果只替换部分就先选中部分区域再替换

感谢老师指点！假如既有单选又有多选，能搞定吗？

		自动登录	找回密码
密码			免费注册

[已解决] 向各位大侠讨教一个word查找替换表达式

评分

评分

评分