p1 = "AF71:AR72,AF74:AR75,AE77:AS78,U88:X89,AC88:AG89,AT88:AX89,BB88:BE89,"
p2 = "G91:Q92,U91:AE92,AM91:AW92,BA91:BK92,U107:X108,AC107:AG108,AT107:AX108,"
p3 = "BB107:BE108,G110:Q111,U110:AE111,AM110:AW111,BA110:BK111"
Sheets("GTS1").Range(p1 & p2 & p3).Select