Hello Joe,

We can call Range.AutoFilter function to filter a range of values. Codes
look like

ActiveSheet.Range("$A$1:$A$24").AutoFilter Field:=1, Criteria1:="B"

http://msdn.microsoft.com/en-us/library/bb242013.aspx
If you want only show "B", we just need to set the Criteria1 parameter to
"B"


Best regards,
Ji Zhou
Microsoft Online Community Support