adding a page break in a pivot table

[redf1re]

how can i add a page break before a certain field in a pivot table??
i search around and i tried something like :

Dim pf As PivotField
For Each pf In ActiveSheet.PivotTables("Tabela dināmica2").PivotFields
If (pf = "PETROLEO") Then
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=pf
End If
Next pf


but its not working, it gives me no error message and its not adding a page break ....
someone can give me a hand pleasE?

[redf1re]

up

[redf1re]

up one more time

[redf1re]

omg... no one can help me??? =[

[redf1re]

im losing hope people, came on

[redf1re]

maybe another up?