如何在點擊 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. 按 Alt + Q 鍵退出 Microsoft Visual Basic for Applications 窗口。

5. 關閉設計模式。

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

使用 Kutools AI 解鎖 Excel 的魔法

• 智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
• 自訂公式：生成量身定制的公式，簡化您的工作流程。
• VBA 編碼：輕鬆編寫和實現 VBA 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！

相關文章：

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