在 Excel 中更改文本大小写——6 超实用的方法

在 Excel 中保持统一的文本大小写格式（例如每个单词首字母大写，或全部使用大写/小写），能显著提升数据的可读性与专业感。与 Microsoft Word 不同，Excel 并未提供直接更改工作表中文本大小写的“更改大小写”按钮，这让许多用户感到困扰。本文为您精心整理了六种实用方法，助您轻松按需调整 Excel 中的文本大小写。让我们一起为您的文本数据打造一致、专业的格式！

• 在 Excel 中更改文本大小写
• 使用内置函数（适用于大写、小写和首字母大写）
• 使用便捷工具，只需几次点击（适用于大写、小写、首字母大写和）句首大写格式）
• 使用 Flash Fill （适用于大写、小写、首字母大写和）句首大写格式）
• 使用 Microsoft Word （适用于大写、小写、首字母大写和）句首大写格式）
• 使用 Power Query （适用于大写、小写和首字母大写）
• 使用 VBA 代码（适用于大写、小写、首字母大写和）句首大写格式）

视频：在 Excel 中更改文本大小写

在 Excel 中更改文本大小写

本节为您展示了多种方法，轻松将单元格中的文本转换为大写、小写、首字母大写或句首字母大写格式。

使用内置函数更改文本大小写

假设您在 A2:A7 区域中有一个名称列表（如下图所示），现在希望将文本的大小写更改为大写、小写或首字母大写——Microsoft Excel 提供了以下内置函数，助您轻松完成此任务。

使用 UPPER 函数将文本大小写更改为大写

要将 A2:A7 区域中的文本转换为大写，请使用 UPPER 函数。操作步骤如下：

步骤 1：应用 UPPER 函数

此处我选择 C2 单元格，输入以下公式并按 Enter 键，即可获得首个结果。

=UPPER(A2)

步骤 2：获取全部结果

选择首个结果单元格，向下拖动其填充柄即可获取所有结果。您可以看到引用的文本已转换为大写，如下图所示。

使用 LOWER 函数将文本大小写更改为小写

要将 A2:A7 区域中的文本转换为小写，可按如下方式应用 LOWER 函数。

步骤 1：应用 LOWER 函数

此处选中单元格 C2，输入以下公式，然后按 Enter 键即可获取第一个结果。

=LOWER(A2)

步骤 2：获取所有结果

选择第一个结果单元格，向下拖动其填充柄即可获取所有结果。如下面的截图所示，引用的文本已成功转换为小写。

使用 PROPER 函数将文本更改为 Proper（词首字母大写）格式

要将 A2:A7 范围内的文本转换为每个单词首字母大写的形式，PROPER 函数即可帮您轻松实现。请按以下步骤操作：

步骤 1：选择一个单元格输出结果并应用 PROPER 函数

此处我选中单元格 C2，输入以下公式，然后按 Enter 键获取第一个结果。

=PROPER(A2)

步骤 2：获取所有结果

选择第一个结果单元格，向下拖动其填充柄即可获取所有结果。如下面的截图所示，引用的文本已转换为首字母大写（每个单词的首字母大写）。

使用便捷工具通过几次单击更改文本大小写

虽然上述函数允许您更改文本大小写，但需要借助辅助列来存储修改后的结果，使用起来不够便捷——尤其当您需将更改后的文本用于后续操作时。而 Kutools for Excel 的改变大小写功能，可让您直接在所选区域中一键将文本转换为大写、小写、词首字母大写，甚至句首字母大写格式！立即体验这一高效便捷的功能吧。

安装 Kutools for Excel 后，请选择 Kutools> 文本> 改变大小写，然后按以下步骤操作：

1. 选择包含您要更改大小写的文本的区域。
2. 在改变大小写对话框中，选择您所需的文本大小写选项。
3. 单击确定。

   

结果

在此示例中，我选择了全部大写选项。单击确定按钮后，所选区域中的所有文本将立即更改为大写。请参见下图。

使用快速填充更改文本大小写

现在，让我们进入第三种方法——快速填充。该功能自 Excel 2013 引入，可在识别数据模式后自动填充内容。在 Excel 中使用快速填充功能更改选定范围内文本的大小写非常简单，操作步骤如下：

步骤 1：在相邻单元格中以所需大小写输入第一个条目

在紧邻第一个数据条目的单元格中，手动输入您希望显示的第一个条目。

例如，如果我想将 A2:A7 范围内的文本更改为大写，我会转到紧邻名字的 B2 单元格，并手动以大写形式输入文本。

步骤 2：应用快速填充以自动填充所有大写文本

将光标移至 B2 下方的单元格，以大写形式输入 A3 中的第二个名称，Excel 便会根据您之前的输入自动识别模式，并显示快速填充建议，一键填充其余单元格的大写文本。此时，请按 Enter 键确认并应用预览结果。

结果

按 Enter 键接受预览后，您将获得如下图所示的大写文本列表。

使用 Microsoft Word 更改文本大小写

使用 Microsoft Word 来更改 Excel 范围内文本的大小写需要一些变通方法，但如果您更熟悉 Word 的大小写转换功能，这种方法或许更具优势。以下是具体步骤：

步骤 1：复制包含要更改大小写的文本的单元格范围

在此示例中，我在 Excel 工作表中选中 A2:A7 区域，然后按下 Ctrl+C 即可复制。

步骤 2：将选择区域粘贴到 Word 文档中

然后，您只需按下 Ctrl+V，即可将复制的内容粘贴到新的或现有的 Word 文档中。

步骤 3：将所选文本更改为大写、小写或其他常用大小写格式

1. 在 Word 中选择已复制的文本。
2. 在开始选项卡下，单击展开改变大小写下拉菜单。
3. 根据需要选择一种大小写选项。此处我从下拉菜单中选择了小写。

   

步骤 4：从 Word 复制已更改的文本并粘贴回 Excel

一旦文本更改为指定的大小写格式（此处文本已更改为小写），您需要按以下步骤操作：

1. 在 Word 中选择并复制已更改的文本。
2. 返回您的 Excel 工作表。
3. 选择要放置文本的区域中的第一个单元格，然后按 Ctrl+V，即可将内容粘贴回 Excel。

   

使用 Power Query 更改文本大小写

您也可以在 Excel 中使用 Power Query 功能更改文本大小写。此方法的缺点与 Microsoft Word 方法类似，需经多个步骤才能完成。立即深入了解其工作原理！

步骤 1：选择数据区域，启用“从表格/区域”功能

选择要更改文本大小写的单元格（包括标题），此处我选择 A1:A7 范围。然后点击数据选项卡中的从表格/区域。

步骤 2：将所选单元格转换为表格格式

如果所选单元格不是 Excel 表格格式，将弹出创建表格对话框。在该对话框中，您只需确认 Excel 是否已正确识别所选单元格范围，勾选表格是否包含标题，然后单击确定按钮即可。

如果所选单元格已是 Excel 表格，请跳至步骤 3.

步骤 3：将文本转换为您所需的任何大小写格式

在打开的 Power Query 窗口中，您需要：

1. 转到转换选项卡。
2. 单击格式。
3. 根据需要选择一种大小写选项（小写、大写、每个单词首字母大写）。此处我从下拉菜单中选择了大写。

   

转换现已完成。如下面的截图所示，在此示例中，Power Query 窗口中的所有文本均已更改为大写。

步骤 4：保存并将文本加载回 Excel

1. 在此例中，由于我需要为数据指定自定义目标位置，因此我在开始选项卡中单击关闭并加载 > 关闭并加载至。

   

   提示：若要将数据加载到新工作表中，请选择关闭并加载选项。
2. 在导入数据对话框中，选择现有工作表选项，指定一个单元格用于放置转换后的文本，然后单击确定。

   

结果

在步骤 3 中指定的文本大小写格式现已返回到您的工作表中。

使用 VBA 代码更改文本大小写

此方法提供了四个 VBA 代码，可帮助您将限定区域中的文本大小写更改为大写、小写、首字母大写和句首字母大写。请按以下步骤操作并选择您需要的代码。

步骤 1：打开 Microsoft Visual Basic for Applications 窗口

按下 Alt+F11 键即可打开此窗口。

步骤 2：插入模块并输入 VBA 代码

单击插入 > 模块，然后将以下任一 VBA 代码复制并粘贴到模块（代码）窗口中。

在此示例中，我想将选定范围内的文本转换为大写，因此只需复制并粘贴以下 VBA 代码 1 即可。

VBA 代码 1：将范围内的文本大小写更改为大写

Sub ChangeToUppercase()
'Updated by Extendoffice 20230913
    Dim rng As Range, cell As Range

    On Error Resume Next
    Set rng = Application.InputBox("Please select a range", "KuTools For Excel", Type:= 8)
    On Error GoTo 0

    If Not rng Is Nothing Then
        For Each cell In rng.Cells
            cell.Value = UCase(cell.Value)
        Next cell
    End If
End Sub

VBA 代码 2：将范围内的文本大小写更改为小写

Sub ChangeToLowercase()
'Updated by Extendoffice 20230913
    Dim rng As Range, cell As Range

    On Error Resume Next
    Set rng = Application.InputBox("Please select a range", "KuTools For Excel", Type:= 8)
    On Error GoTo 0

    If Not rng Is Nothing Then
        For Each cell In rng.Cells
            cell.Value = LCase(cell.Value)
        Next cell
    End If
End Sub

VBA 代码 3：将范围内的文本大小写更改为首字母大写

Sub ChangeToPropercase()
'Updated by Extendoffice 20230913
    Dim rng As Range, cell As Range
    Dim vText As Variant, i As Long

    On Error Resume Next
    Set rng = Application.InputBox("Please select a range", "KuTools For Excel", Type:= 8)
    On Error GoTo 0

    If Not rng Is Nothing Then
        For Each cell In rng.Cells
            vText = Split(cell.Value, " ")
            For i = LBound(vText) To UBound(vText)
                vText(i) = Application.WorksheetFunction.Proper(vText(i))
            Next i
            cell.Value = Join(vText, " ")
        Next cell
    End If
End Sub

VBA 代码 4：将范围内的文本大小写更改为句首字母大写

Sub ChangeToSentenceCase()
'Updated by Extendoffice 20230913
    Dim rng As Range, cell As Range
    Dim content As String

    On Error Resume Next
    Set rng = Application.InputBox("Please select a range", "KuTools For Excel", Type:= 8)
    On Error GoTo 0

    If Not rng Is Nothing Then
        For Each cell In rng.Cells
            content = LCase(cell.Value)
            cell.Value = UCase(Left(content, 1)) & Mid(content, 2)
        Next cell
    End If
End Sub

步骤 3：运行 VBA 代码

按 F5 键运行代码，随后将弹出一个对话框，提示您选择要更改文本大小写的单元格（此处我选择 A2:A7 范围）。选择完成后，单击确定。

结果

所选单元格中的文本将立即更改为大写，或您指定的其他大小写格式。

这些方法的比较

下表对比了本文提及的各类方法。每种方法各有利弊，具体选择应根据您的实际需求而定。

总之，在 Excel 中更改文本大小写的方法多种多样，每种都契合不同的使用习惯与技能水平。无论您追求快速解决还是全面掌控，都值得深入探索各类技巧，找到最契合您需求的方案。想更深入掌握 Excel 强大功能？我们的网站提供大量实用教程，在此发现更多 Excel 使用技巧。

相关文章