如何写代码，让选中后的选项号变成大写

相见是缘8

leikaiyi123 发表于 2018-2-21 17:57
呵呵，先是手机写的没测试，
现在7楼的已修改，测试通过。

你好！
你修改后的代码，我测试的结果是：把所有（选中和没有选中）的a.b.c.d.四个英文小写选项号变成英文大写。10楼duquancai大神的代码，才准确的把选中的a.b.c.d.四个英文小写选项号变成英文大写。

相见是缘8

duquancai 发表于 2018-2-21 19:52
Sub test()
    Dim Q As Range, R As Range
    If Selection.Type = wdSelectionIP Then

大神的代码扛扛的！
duquancai 大神，有不有兴趣帮一下我的这个 “用VBA把文档中的图片显示出来” 求助难题？
http://club.excelhome.net/thread-1396274-1-1.html

leikaiyi123

相见是缘8 发表于 2018-2-22 07:07
你好！
你修改后的代码，我测试的结果是：把所有（选中和没有选中）的a.b.c.d.四个英文小写选项号变成英 ...

呵呵，我写的是全文替换，没写处理选中的，纯属练习代码而已。跟杜老师学习了。