Do you have labels next to them? Remember, labels don't shrink. I cover this in the class that deals with Can Shrink in reports. Access Expert 9, I think.

I do have labels, but there is a label next to Discount and that shrinks no problem. Curious!!

It will turn invisible if you make the attached text box invisible, but it won't shrink. Remove ALL of the labels just to test it and you'll see if that's the culprit.

Richard,
That's what I find curious. It does make the Discount label invisible and it does shrink and move the rest of the totals up, perfect, no problem, but the second one (Pre-PaidAmount) doesn't work.

Richard,
OK, I added this to the ON GOT FOCUS event of the Report:
   If Me!DiscountTotal  0 Then
      Me!DiscountTotal.Visible = True
   Else
      Me!DiscountTotal.Visible = False
   End If
      If Me!PrePaidAmount  0 Then
      Me!PrePaidAmount.Visible = True
   Else
      Me!PrePaidAmount.Visible = False
   End If
The CanShrink property is set to "Yes" on both the fields and the Detail section of the report.
The labels now disappear and both the sub totals move up, filling the blank lines.
This threw me because everywhere I looked it was stated that Labels will NOT shrink.... but they apparently do!!!
Did Microsoft change something and not tell us? Many thanks....... Bill D.

It's possible. They make little changes all the time just to annoy me. :)  Since you made them not visible, they probably don't affect the height of the section. One thing, move your code from the On Got Focus to the BUILD EVENT of the SECTION (right click on the section header, Build Event). That will put the code in the Format event of the section, which is where you want it. Also, you don't need all the Me's.

Richard,
OK, moved using the Build Event on the Detail Section and that works fine.
I like the Me's, it's all about Me didn't you know that? :-)

Haha. Yes, of course. :)