rt.cells(nt+2,cp).text = IIF(crs(n)("包")=true,crs(n)("包"),"")
rt.cells(nt+3,cp).text = crs(n)("鞋子") '同上,同理 rt.cells(nt+4,cp).text = crs(n)("饰品") '同上