如何强制文本框中的文本输入为大写字母？

在 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. 然后保存并关闭代码窗口，并退出设计模式，现在，当您在文本框中输入文本时，它将被强制输入为大写字母，请参见截图：