Hello out there,
I've been writing a macro including a UserForm.
Depending on the value of a checkbox (one or more) documents should be
printed either with or without markup showing, or as shown on screen.

Part of the code I wrote (name of the checkbox = CheckMarkup):

With Documents(...)    'the particular open document
  If CheckMarkup = True Then
     With .ActiveWindow.View
        If .RevisionsMode <> wdBalloonRevisions Then _
                    .RevisionsMode = wdBalloonRevisions  
                                  'always show revisions as balloons
                                   
        .ShowRevisionsAndComments = True
        .ShowFormatChanges = True
        .ShowInsertionsAndDeletions = True
     End With
     PrintMarkup = wdPrintDocumentWithMarkup  
                         'variable to be used later with PrintOut command

  ElseIf CheckMarkup.Value = False Then
     PrintMarkup = wdPrintDocumentContent

  ElseIf IsNull(CheckMarkup.Value) = True Then
     If (.Revisions.Count = 0 And .Comments.Count = 0) Then
                     'no revisions, no comments present
        PrintMarkup = wdPrintDocumentContent

     ElseIf .ActiveWindow.View.ShowRevisionsAndComments = False And _
           .ActiveWindow.View.ShowFormatChanges = False And _
           .ActiveWindow.View.ShowInsertionsAndDeletions = False Then
                     'no markup visible
        PrintMarkup = wdPrintDocumentContent

     Else          'markup visible
        PrintMarkup = wdPrintDocumentWithMarkup

     End If
  End If

  .PrintOut Item:=PrintMarkup 'print the relevant way

  '... (restoring the Show... properties when necessary)

End With

My question: this works well in the beginning. But: after having printed one
or more documents without markup, and thereafter the same document(s) 'as
shown' or  with markup, no balloons are printed anymore, although they do
show on screen.

Does anyone know what is happening?
As far as I'm aware of I'm using the right properties, or do I miss one or
more?

Moreover: in order to check what happens I recorded some macros. I was
really astonished to find the statement WordBasic.ViewChanges for menu
choices View > Markup.
And as astonished to find WordBasic.ShowComments for changing (on the
Reviewing toolbar) the Show-option for comments.
I couldn't any documentation on this nor were these statements present in
Word95 or Word97.
Can anyone explain this to me?

Thanks in advance for any advice!
Peter