Question

用VBA复制指定条件的单元格

如图A列为某类产品的编码，B列为需要补充的货量共1077件，行数为789行。我要把这个表格里的内容按照条件复制到新建的SHEET中条件：条件1，SHEET中的A列依然为编码，B列为补充的货量.无需标题行，即A1直接为编码，B1为货量条件2，SHEET中行数不超过200行，B列的和不超过500件，两个条件任意一个超过指定值，则多余的部分复制新建的SHEET中，并且依然遵守此规则。条件3，此处的编码为13位码，本身无重复值。要求9位码相同的行必须被复制到同一个sheet中，不能被分开。例如13位码为1533421345102，则九位码为153342134，即从左往右取取9个数。请大神帮我写一段代码，谢谢
地址：785099744 @qq.com。中间有个空格键，请去掉，不然传不上
同个9位码的行数本身不会超过200行，若数量合计超过500，不需要分开复制。

Answer 1

自己说的条件冲突,万一前九位数字相同的超过200行,或件数超过500    能不能分开?  

还有...附件也不上一个....

追问

地址：785099744 @qq.com。中间有个空格键，请去掉，不然传不上
同个9位码的行数本身不会超过200行，若数量合计超过500，不需要分开复制。谢谢大神