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

守候_CJ

shoe12 发表于 2023-2-23 15:32
感谢老师指点！假如既有单选又有多选，能搞定吗？

使用我的方案，如果多选答案的形式是：

答案[ABCDEF]

而其他地方和单选题无差别的话
多选是同时搞定的

tcdatongye

shoe12 发表于 2023-2-23 15:20
感谢老师，再进一步问问：假如既有单选又有多选，有办法如何弄吗？

当然可以。主要你要把各类题型弄出来。

shoe12

tcdatongye 发表于 2023-2-23 16:44
当然可以。主要你要把各类题型弄出来。

拜托老师看看

tcdatongye

shoe12 发表于 2023-2-23 16:56
拜托老师看看

Sub aa()
With Selection
  .EndOf wdStory
  With .Find
    .Wrap = wdFindStop
    .Forward = False
    .MatchWildcards = True
    .Text = "\[[A-Z]{1,4}\]"
    Do While .Execute
      t = Mid(.Parent, 2, Len(.Parent) - 2)
      Selection.MoveEndUntil "(（", wdBackward
      Selection.MoveEndWhile " ", wdForward
      Selection.Text = t
      Selection.Move Count:=-1
    Loop
  End With
End With
End Sub

守候_CJ

shoe12 发表于 2023-2-23 15:32
感谢老师指点！假如既有单选又有多选，能搞定吗？

可以完成，现在不用作任何修改，我写的时候就考虑这种情况了。

shoe12

守候_CJ 发表于 2023-2-23 15:53
使用我的方案，如果多选答案的形式是：

而其他地方和单选题无差别的话

老师，我用13楼的附件试了下，只能替换单选呢

守候_CJ

shoe12 发表于 2023-2-23 18:20
老师，我用13楼的附件试了下，只能替换单选呢

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

shoe12

守候_CJ 发表于 2023-2-23 18:32
勾选：使用通配符
查找 ：(（)(   )(）*^13*^13*\[)([ABCD]@)(\])
替换：\1\4\3\4\5

出现了奇怪现象：第一次多选第六题没成功，我以为是题干里面的英文括号有问题，
修改成中文括符后，第七题又没成功，不知道啥原因？

守候_CJ

shoe12 发表于 2023-2-23 18:59
出现了奇怪现象：第一次多选第六题没成功，我以为是题干里面的英文括号有问题，
修改成中文括符后，第七 ...

某个题不对，是因为：
鼠标光标放在了这段的中间
解决方案：
把鼠标放在某题开头或者文档开头

守候_CJ

守候_CJ 发表于 2023-2-23 19:19
某个题不对，是因为：
鼠标光标放在了这段的中间
解决方案：

不客气
更多Word通配符替换问题，参考我的专栏：
https://www.zhihu.com/column/c_1517437402993397760