Caio,

Peguei, já ha algum tempo; o seguinte codigo no site OzGrid (http://www.ozgrid.com/forum/showthread.php?t=67231&page=1)

Porem, só indica as palavras não reconhecidas, sem oferecer a correção propriamente dita.

Eu não evolui na pesquisa, mas pode ser um inicial.

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) 

    Dim v As Variant 
     'change TextBox1 to name of control
    For Each v In Split(TextBox1.Text) 
        If Not Application.CheckSpelling(v) Then _ 
        MsgBox "'" & v & "' is not a valid word.", _ 
        vbExclamation 
    Next v 
     
End Sub 

Massa, se ele desse as sugestões ia ser interessante.

mas de qualquer forma pode ser util...
vlw