title: Text Box Rotation Issue
body: <p>I am trying to write a macro to insert a custom watermark in my Word document.</p>
  <p>The code works perfectly for the first two pages of the document but thereafter the the Textbox does not rotate to -45 as mentioned in the code</p>
  <p>What am I doing wrong?</p>
  <pre><code>Sub CustomWatermark()
  
      Dim activeDoc As Document
      Dim rngDoc As Range
      Dim shpTextBox As Shape
      Dim lngPages As Long
      Dim i As Long
      Dim strWatermark As String
      
      
      Set activeDoc = ActiveDocument
      
      lngPages = activeDoc.Range.Information(wdNumberOfPagesInDocument)
      
      strWatermark = InputBox(&quot;Enter Watermark&quot;)
      
      With activeDoc
      
          For i = 1 To lngPages
  
              Set rngDoc = .GoTo(What:=wdGoToPage, Name:=i)
              rngDoc.Collapse wdCollapseStart
          
              Set shpTextBox = .Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
                                              Left:=InchesToPoints(1), _
                                              Top:=InchesToPoints(4), _
                                              Width:=InchesToPoints(6), _
                                              Height:=InchesToPoints(2), _
                                              Anchor:=rngDoc)
              With shpTextBox
                  .Line.Visible = msoFalse
                  .Rotation = -45
                  .WrapFormat.Type = wdWrapBehind
                  .TextFrame.HorizontalAnchor = msoAnchorCenter
                  .TextFrame.VerticalAnchor = msoAnchorMiddle
                                                  
                  With .TextFrame.TextRange
                      .Font.AllCaps = True
                      .Font.Size = &quot;60&quot;
                      .Font.ColorIndex = wdGray25
                      .ParagraphFormat.Alignment = wdAlignParagraphCenter
                      .Text = strWatermark
                      
                  End With
              End With
          Next
      End With
      
  
  End Sub
  </code></pre>