如何在 Excel 文字框中應用拼寫檢查？

我們經常在 Word 中使用“拼寫檢查”功能，但您是否嘗試過在 Excel 中對文字框應用拼寫檢查？這並不是 Excel 的內建功能；因此，我們需要修改文字框才能完成我們的操作。拼寫檢查無法應用於普通文字框；它需要是 ActiveX 命令文字框，它將在 Excel 的開發人員選項下提供。

閱讀本教程以瞭解如何在 Excel 文字框中應用拼寫檢查。

在 Excel 文字框中應用拼寫檢查

在這裡，我們將首先插入一個 VBA 模組，然後執行它來完成任務。讓我們來看一個簡單的過程，以瞭解如何對 Excel 中的文字框應用拼寫檢查。我們將使用 VBA 應用程式的幫助來完成我們的過程。

步驟 1

讓我們考慮一個 Excel 工作表，其中存在一個 ActiveX 命令文字框，如下面的圖片所示。要將資料輸入文字框，請退出設計模式，然後輸入資料。

要使用拼寫檢查，請退出設計模式，然後右鍵單擊文字框並選擇“檢視程式碼”以開啟 VBA 應用程式，然後將現有程式碼替換為下圖所示的程式。

程式

Sub SpellChkRvw_Click()
'updated by Nirmal
   Dim xObject As Object
   Dim xCell As Range
   On Error Resume Next
   Set xCell = ActiveSheet.Cells(ActiveSheet.Rows.Count, ActiveSheet.Columns.Count)
   If ActiveSheet.OLEObjects.Count > 0 Then
      For Each xObject In ActiveSheet.OLEObjects
         xCell = xObject.Object.Text
         xCell.CheckSpelling , , , 1033
         xObject.Object.Text = xCell
      Next
   End If
End Sub