Vba拆分行,按每行后面的箱规拆分

如何根据每行最后的箱规,将数据拆分为不大于箱规的行,将拆分后的数据显示在新建的sheet里

img