在 Excel 中更改文本大小写 – 六种超实用方法

在 Excel 中保持一致的文本大小写（例如，将每个单词的首字母大写或使用统一的大小写），可以显著提高数据的可读性和专业性。与 Microsoft Word 不同，Excel 并未提供“更改大小写”按钮来调整工作表中的文本大小写，这使得许多 Excel 用户的工作变得复杂。本文提供了六种实用方法，帮助您根据需要更改 Excel 中的文本大小写。让我们共同努力，为您的文本数据带来一致性！

• 更改 Excel 中的文本大小写
• 使用内置函数（用于大写、小写和首字母大写）
• 通过几次点击使用便捷工具（用于大写、小写、首字母大写和 句子 大小写）
• 使用快速填充（用于大写、小写、首字母大写和 句子 大小写）
• 使用 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 函数将文本大小写更改为首字母大写（标题大小写）

要将 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 更改文本大小写

您还可以应用 Power Query 功能来更改 Excel 中的文本大小写。这种方法的缺点是需要多个步骤才能完成，就像 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 技巧和窍门。

相关文章