Apply filter in a pivot table

When i record a pivot table in order to generate a macro i have this problem, whenever i change the data source the pivot table it reduces the range from which the pivot table its created by a few columns short, and when i tried to filter some items from a field it makes a code like this:

.PivotFields("VendoLoc").PivotItems("x1").Visible = False

.PivotFields("VendoLoc").PivotItems("x3").Visible = False

.PivotFields("VendoLoc").PivotItems("x5").Visible = False

When i really want to see only the X2 and X4 values in the pivot table, so when i change the data the items i still wanna see the X2 & X4 values but now i also got new X6 values and so on to filter, i don't know how to use this code that excel creates in order to filter only the values i wanna see,not the one i dont wan't want to see.
Ideas to solve this 2 issues?
Thanks in advanced.

Your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution. Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.
To change a Title on your post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.