Word中如何用宏实现将文章中的所有的英文字母替换为斜体tIME NEW ROMA?
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/11/08 12:38:29
Word中如何用宏实现将文章中的所有的英文字母替换为斜体tIME NEW ROMA?
如果不是用宏,办法如下:
打开查找对话框,查找[a-z,A-Z],并勾选“突出显示所有在该范围找到的项目”和“使用通配符”,点击查找全部,然后选择字体tIME NEW ROMA即可.
我对WORD宏不太了解,录制了个宏,代码如下:
Macro
' 宏在 2012-3-7 由 s 录制
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "[a-z,A-Z]"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Font.Name = "Times New Roman"
End Sub
再问: .Replacement.Text = "" 这个替换里面什么啊没,替换后就什么都没有了,不知道为什么,也是这样录制的
再答: 具体的宏运行我不太清楚,我只知道不用宏的操作,按照道理来说,.Replacement.Text = "" 就是替换值为空,不应该会把数据替换没了啊。
打开查找对话框,查找[a-z,A-Z],并勾选“突出显示所有在该范围找到的项目”和“使用通配符”,点击查找全部,然后选择字体tIME NEW ROMA即可.
我对WORD宏不太了解,录制了个宏,代码如下:
Macro
' 宏在 2012-3-7 由 s 录制
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "[a-z,A-Z]"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Font.Name = "Times New Roman"
End Sub
再问: .Replacement.Text = "" 这个替换里面什么啊没,替换后就什么都没有了,不知道为什么,也是这样录制的
再答: 具体的宏运行我不太清楚,我只知道不用宏的操作,按照道理来说,.Replacement.Text = "" 就是替换值为空,不应该会把数据替换没了啊。
microsoft word中如何用某字替换文章中的所有的另一个字
有一套物理卷子,在文章里有ABCD .在选择题里也有ABCD,要求是在word中替换文章中的ABCD为斜体.
word文档中,如何将所有的宋体英文字母改成times new roman的形式
word如何实现条件复制,如:把一篇文章中所有红色的字复制过来
将文章中所有的英文括号"()"替换为中括号"【 】".
如何用Word将包含相同的字的词语替换掉?
C语言 实现将字符串中所有偶数位置上的小写英文字母转化为大写英文字母(不是英文字母则不转换)
如何用word检查文章中重复的字
如何用word替换去掉括号内的文字
如何是WORD中全篇文章中的某一个词全部替换为英文?
Word中怎样将所有单个的字母、数字或符号替换掉
如何在WORD中将文章中所有的英文字母变成大写