microsoft.public.word.vba.general

Hi Graham,

Yup, that did it. Thanks.

I do have one other question though. You talk about hitting it with a
blunt object. Perhaps a bit more finesse is called for. Would you go for
a precision sledge hammer? I've been trying to get the boss to get me
one of those, along with a glass of hot chocolate, a bickie, and a
little mattress to roll out under my desk to take an afternoon nap when
it gets too frustrating.

Regards,

Alan Stancliff

Graham Mayor wrote:
> The document I was using had no proofing set throughout. If the document has
> the proofing option set then the spell check does appear to continue past
> the end of second section. To overcome this, when all else fails hit it with
> a blunt instrument ;)
>
> Sub SpellSec2()
> Dim rDoc As Range
> Dim Sec2 As Range
> Set rDoc = ActiveDocument.Range
> With rDoc
> .Select
> #If VBA6 Then
> .NoProofing = True
> #End If
> End With
> Set Sec2 = ActiveDocument.Sections(2).Range
> With Sec2
> .Select
> #If VBA6 Then
> .NoProofing = False
> #End If
> .LanguageID = wdEnglishUS
> .CheckSpelling
> End With
> End Sub
>