Spelling check in excel
 

Hello all,

This code is meant to run a spell check when closing a workbook in excel, it
works fine but doesn't set focus on the specific
cell it's checking (like the spelling check from the toolbar dose). how can
I set it to mark the spelling mistake during the spell check?

Private Sub App_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)

.........
Application.SpellingOptions.DictLang = 1033
strResult1 = Cells.CheckSpelling
......
...

End Sub

Thanks,

r