hide blank rows in Segmentation tool

Hi everyone,

Have got several questions:

1. I'm trying to hide the "Blank" rows that shows on my data segmentation tool, and don't know how.

2. Is there a way to avoid my pivot table to shrink each time I update my data?

I have selected the option showed in the picture, but still have the same problem, everytime I refresh

3. I'm trying to hide this filter icono on all my pivot table 

with this code in macro but always getting this same error:

Code:

Sub FiltersTD()

        Dim PT As PivotTable
        Dim Campo As PivotField
        For Each PT In ActiveWorkbook.PivotTables
               For Each Campo In PT.PivotFields
                     Campo.EnableItemSelection = False
               Next Campo
        Next PT

End Sub

I get the same error all the time I get "error 1004, un defined object" and the problem seems to be because of this quote "CampoTD.EnableItemSelection = True"

What can I do?

Thanks in advance.