Hi Dave

I'm not sure if anyone else here can point you in the right direction
for checking spelling directly on the form but the code below works by
putting the textbox value in a cell and then check the cell checking
the spelling and then replacing the textbox with the value from the
cell.

Option Explicit

Option Explicit

Private Sub CommandButton1_Click()

With Sheets(1)

.Cells(1, 1).Value = TextBox1.Value

.Cells(1, 1).CheckSpelling SpellLang:=2057

TextBox1.Value = .Cells(1, 1).Value

.Cells(1, 1).Value = ""

End With

End Sub

Hope this helps

Steve