对选中的每一个单词实现如下效果（最终）

413191246se · 发表于 2020-7-13 00:13

* 楼主，我去年购买了联想主机，和你一样，也是 Win10(64)+Office2019，而 Win10 系统记事本编码是 UTF-8，32机的编码是 ANSI，所以，你只须将代码粘贴到新建文档中，再全选剪切下来，粘贴到 VBE 中即可。

666611430 · 发表于 2020-7-13 13:20

413191246se 发表于 2020-7-13 00:13
* 楼主，我去年购买了联想主机，和你一样，也是 Win10(64)+Office2019，而 Win10 系统记事本编码是 UTF-8， ...

*谢谢你的指点。我刚测试了一下，但结果有一些问题。如果你愿意留一下联系方式，我可以详细的述说我想要的结果。希望你帮忙到底。

413191246se · 发表于 2020-7-13 16:31

请在这里说吧！

666611430 · 发表于 2020-7-20 13:40

413191246se 发表于 2020-7-13 16:31
请在这里说吧！

请你留个联系方式，我可以具体述说自己的要求，有偿帮忙也行。

413191246se · 发表于 2020-7-21 00:09

楼主，我水平并不高，只是爱好编程；另外，如果我能解决的问题，会无偿帮忙的，并不收费，永不收费。
如果有什么问题可以发到我的邮箱：ln1400014884@163.com

gbgbxgb · 发表于 2020-7-23 06:33

本帖最后由 gbgbxgb 于 2020-7-30 07:55 编辑

试试附件。

yyy.rar (16.18 KB, 下载次数: 22)

413191246se · 发表于 2020-7-23 10:10

噢！天呢！gbgbxgb 老师太厉害了！和杜老师、ming0018老师、zhanglei1371老师、loquat老师及各位版主、高人一样！不仅会 VBA 基础知识，还会字典、正则、递归等高级编程技术，我连“As Object”都不懂！老师的代码，真是令人叹为观止！水平高我万倍不止！——代码运行OK，企盼楼主采用 gbgbxgb 老师的代码！看来，我跟各位老师的距离不止万里之遥啊！学无止境，艺无止境！

666611430 · 发表于 2020-7-23 10:53

gbgbxgb 发表于 2020-7-23 06:33
试试附件。

非常感谢老师帮忙。正是我所想要的结果。

666611430 · 发表于 2020-7-23 10:55

413191246se 发表于 2020-7-23 10:10
噢！天呢！gbgbxgb 老师太厉害了！和杜老师、ming0018老师、zhanglei1371老师、loquat老师及各位版主、高 ...

也感谢你近期关注，也感谢所有无私奉献的所有朋友。

wdpfox · 发表于 2020-7-23 14:02

gbgbxgb 发表于 2020-7-23 06:33
试试附件。

老师，能否统计次数的范围为全文，而不是所选的段落。另外，单词的拆分能否按音节拆分。辅音与其后的元音结合为一组，一个这样的组合就带上后面的辅音，大致这样分一下即可，比拆分单词为字母要高一个要求。

Meet by chance like patches of drifting duckweed, May everything be fine with everyone !
（你我萍水相逢，愿君一切安好！）

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

[求助] 对选中的每一个单词实现如下效果（最终）

评分