将“交替大小写”应用到文档吗?

将“交替大小写”应用到文档吗?

有没有办法将文档中的一个单词依次转换为大写和一个小写?例如,我写了一行“HOW ARE YOU I AM FINE”,它将转换为“HoW aRe YoU i Am FiNe”。

答案1

这是一个 VBA 例程,可以执行您描述的操作:

Sub Alternate_case()

    Selection.HomeKey Unit:=wdStory

    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "^$"
        .Forward = True
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        Do While True
            .Execute Wrap:=wdFindStop
            If Not .Found Then Exit Do
            Selection.Range.Case = wdUpperCase
            .Execute Wrap:=wdFindStop
            If Not .Found Then Exit Do
            Selection.Range.Case = wdLowerCase
        Loop
    End With
End Sub

Selection.HomeKey语句相当于Ctrl+ Home;它跳转到文档的开头。如果您只想从调用例程时所在的位置开始,请删除它。接下来的十几行设置了不区分大小写、非通配符的正向搜索字母 ( Text = "^$")。(您可能可以删除这些….ClearFormatting行和… = False行,因为它们只是明确建立了默认参数。)

Do While True块是一个“无限循环”,在找到文档中的最后一个字母后停止。它执行配置的搜索(查找字母),而不绕回到文档的开头(Wrap:=wdFindStop);如果失败(Not .Found),它会终止循环(Exit Do),否则它会继续将所选字母大写并再次搜索。在下一次搜索中,如果成功,它会将字母设置为小写,依此类推。

如何在 MS Office 中添加 VBA?有关如何在 Microsoft Word(以及 Excel 等)中使用 VBA 的一般信息

答案2

确实几乎是可能的。只需使用大写字体按钮选择所需的选项即可。

在此处输入图片描述

以下是您必须执行的操作的完整描述。

选项卡中字体组,点击更改大小写 在此处输入图片描述,然后单击所需的大写选项。

您也可以选择文本然后执行键盘快捷键

要使用键盘快捷键更改大小写,请按Shift+F3直到选择了所需的样式(标题大小写、全部大写或小写)。

来源

这正是你对问题应该做的。你甚至可以复制并粘贴引用的文本来做到这一点。

大家好,我有个问题,有没有办法将文档中的一个单词按顺序转换为大写和一个小写,例如,我写了一行“你好吗,我很好”,这将转换为“你好吗,我很好”

相关内容