在Excel中單擊時如何清除文本框的內容？

通常，要清除文本框（ActiveX控件）的舊內容，您必須進入文本框，選擇全部內容，然後按Backspace或Delete鍵。 如何快速清除文本框中的所有內容？ 本文將向您展示一種VBA方法，只需雙擊它即可快速清除文本框的內容。

使用VBA代碼單擊時清除文本框的內容

---

使用VBA代碼單擊時清除文本框的內容

以下VBA代碼可以幫助您在雙擊文本框時快速清除其內容。 請執行以下操作。

1.如果工作表中已經存在一個文本框，請通過單擊打開設計模式 開發人員 > 設計模式。 看截圖：

或者，您也可以通過點擊插入文本框 開發人員 > 插入 > 文本框（ActiveX控件）。 看截圖：

2.右鍵單擊文本框，然後單擊 查看代碼 從上下文菜單中。 看截圖：

3.在開幕 Microsoft Visual Basic for Applications 窗口，請用下面的VBA代碼替換“代碼”窗口中的原始VBA代碼。

VBA代碼：雙擊文本框時清除其內容

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
  If Not iGblInhibitTextBoxEvents Then
    TextBox1.Value = ""
  End If
End Sub

備註：在代碼中，TextBox1是您將清除內容的文本框的名稱。 請更改為您自己的。

4。 按 其他 + Q 退出鍵 Microsoft Visual Basic for Applications 窗口。

5.關閉設計模式。

從現在開始，雙擊文本框，其內容將立即清除。

---

相關文章：

• 在Excel中選擇文本框時如何自動選擇文本？
• 在Excel中鍵入時如何自動完成文本框？
• 如何將多個單元格的文本連接到Excel中的文本框中？
• 如何禁用文本框中的編輯以防止用戶在Excel中輸入？
• 如何在Excel中將文本框設置為百分比格式？