在 Excel 中，我们可以使用 UPPER 函数快速将单元格中的小写字母转换为大写，但您是否尝试过让文本框中输入的文本自动强制转为大写？本文将为您介绍一段简单代码，轻松实现这一功能。

使用 VBA 代码强制文本框中的输入内容为大写

使用 VBA 代码强制文本框中的输入内容为大写

要强制在文本框中输入的文本以大写形式显示，以下 VBA 代码或许能帮到您：

1. 首先，单击开发工具> 插入> 文本框（ActiveX 控件），然后根据需要在文档中绘制一个文本框，参见截图：

2. 插入文本框后，右键单击该文本框，从上下文菜单中选择查看代码，即可打开 Microsoft Visual Basic for Applications 窗口；随后将原始代码替换为以下 VBA 代码，并粘贴到空白模块中：

VBA 代码：强制文本框中的文本为大写：

Private Sub TextBox1_Change()
    TextBox1.Text = UCase(TextBox1.Text)
End Sub

3. 然后保存并关闭代码窗口，退出设计模式。现在，当您在文本框中输入文本时，内容将自动转换为大写，参见截图：

太棒了！在 Excel 中像使用 Chrome、Edge、Firefox 和 Safari 一样高效地使用 Tabs！
每天为您节省 50% 的时间，并减少成千上万次鼠标点击！