Excel 选择文本框时自动选择文本

当我们处理文本框时，更新和删除里面的数据是非常重要的，但如果它包含大量的数据，我们需要选择文本框里面的数据并删除它。在本教程中，我将解释通过点击文本框选择数据的过程。本教程将帮助你了解在Excel中选择文本框时如何自动选择文本。

当文本框被选中时自动选择文本

在这里，我们将首先创建一个宏，然后将其分配给文本框。让我们看看一个简单的过程，了解我们如何在Excel中使用VBA应用程序选择文本框时自动选择文本。我们将在开发者选项下使用一个ActiveX命令文本框。

第1步

让我们考虑一个Excel工作表，其中有一个活动的 “X “命令文本框，类似于下面图片中的工作表。

如何在Excel中选择文本框时自动选择文本？

要打开VBA应用程序，右击文本框并选择查看代码，然后将程序输入文本框，如下图所示。

示例

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, _
ByVal X As Single, ByVal Y As Single)
'Updated by Nirmal
   Call SelTextBox(Me.TextBox1.Object)
End Sub

Sub SelTextBox(xTextBox As Object)
   With xTextBox
      .SelStart = 0
      .SelLength = Len(.Text)
   End With
End Sub

如何在Excel中选择文本框时自动选择文本？

第2步

现在将工作表保存为启用宏的工作表，并使用 “Alt + Q “命令关闭vba应用程序，然后退出设计器模式，每次我们点击文本框，其中的所有数据都会被选中，如下图所示。

如何在Excel中选择文本框时自动选择文本？

如果你有多个文本框，那么你可以在程序中加入以下代码。

示例

Private Sub TextBox2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
   Call SelTextBox(Me.TextBox2.Object)
End Sub