多语言展示
当前在线:1966今日阅读:138今日分享:34

vba删除中英文混排的文本中所有英文的方法

本条经验讲诉的是使用word中的VBA编程功能自动删除中英文混排的文本中所有英文的方法。
工具/原料
1

Windows10任意版本

2

Microsoft office 2019

方法/步骤
1

打开文档,如下图所示,为中英文混排的文档,英文一行,中文另一行。

2

同时按下fn和F11键打开word的VBA编辑窗口。

3

鼠标左键双击左侧红框处后弹出右侧的编程输入栏。

4

在右侧的编程输入栏输入“Sub 删除() With ActiveDocument    For i = .Paragraphs.Count To 1 Step -1        If VBA.Left(.Paragraphs(i).Range.Text, 1) Like '[a-z]' Then .Paragraphs(i).Range.Delete    Next End With End Sub”。

5

点击上部工具栏三角形的运行键运行编辑好的程序后点击它左侧的word图标。

6

回到word编辑界面,可以看到文档中的英文都被删除了。

注意事项

如果觉得这条经验对您有用,请点击左下角的“投票”和“有得”按钮给小编一个鼓励吧

推荐信息