WindowSelectionChange

[Kyle]

Can anyone tell me why my WindowSelectionChange will work on a Windows
2000/Word 2000 machine and NOT an XP/Word XP machine?

I'm going crazy trying to figure out why this event will not even
attempt to fire on many XP machines.

Thank you,

Kyle

-----------------------------------------------------------------------------
Private Sub objWord_WindowSelectionChange(ByVal Sel As Selection)

On Error Resume Next

modTemplateType.TemplateType

If blnSubmission = True Then
If Sel.StoryType = wdEvenPagesFooterStory Or _
Sel.StoryType = wdEvenPagesHeaderStory Or _
Sel.StoryType = wdFirstPageFooterStory Or _
Sel.StoryType = wdFirstPageHeaderStory Or _
Sel.StoryType = wdPrimaryFooterStory Or _
Sel.StoryType = wdPrimaryHeaderStory Then
ActiveWindow.ActivePane.View.SeekView =
wdSeekMainDocument
ShowHeaderInfoForm
End If
End If

blnSubmission = False

End Sub

 

[Word Heretic]

G'day (e-mail address removed) (Kyle),

#1: There's no point instancing a selection object, just use the built
in one. That is, change Sel to Selection and kill the parm.

#2: Is blnSugg working OK?

#3: Try producing a virginal template which just traps the event and
msgboxes - does it work? If not - sounds like a bug 2 me.

Steve Hudson - Word Heretic
Want a hyperlinked index? S/W R&D? See WordHeretic.com

steve from wordheretic.com (Email replies require payment)


Kyle reckoned: