vba excel sheet1里保留sheet2的内容

vba sheet1 b列 只保留sheet2中a2-a3内容，电视机洗衣机微波炉 这些行，其他行删掉。 sheet2的a列要设置一个变量，有可能增加选项。
请问这个怎么写啊