vba条件语句:vba多个条件语句[朗读]

我怀疑你a列最后一格的右下方(比如b、c等列)还有数据,导致activecell.currentregion.rows.count比a列最后一格的行数大.将sheets(＂订单总表＂).range(＂a1＂).select'获取订单总表已有数据行数introw=activecell.currentregion.rows.countstrbh=cells(introw,1)'取得最后编号改为range(＂a9555＂).end(xlup).select'获取订单总表已有数据行数introw=activecell.rowstrbh=cells(introw,1)'取得最后编号应该就可以了。