What am I missing to get this to work?

[fredep57]

I have a macro that prints an invoice in word. In it I change the footer information. Now it works up to the point below

  While ActualCopies <= mCopies
    If ActualCopies = 1 Then
        WordBasic.ViewFooterOnly
        Selection.EndKey Unit:=wdLine, Extend:=wdExtend
        Selection.Delete Unit:=wdCharacter, Count:=1
        Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
        Selection.TypeText Text:="Customer Copy"
        ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

Actually, it failes at the "WordBasic.ViewFooterOnly" line with the error"Runtime error '438': Object does not support this property or method"

What do I need to do/add to get this to work??