一、代码需求
因公司分布全国范围,有很多省公司,总部看到的是三张总指标,给省公司下发的时候需拆分到每个省公司单独的表中;如图
图一:要拆分的三张表
图二:省公司表
图三:省公司项目表
图四:省公司人员表
二、代码示例
Sub 为各个省公司拆分表()
Dim i As Integer, x As Integer, y As Integer, z
因公司分布全国范围,有很多省公司,总部看到的是三张总指标,给省公司下发的时候需拆分到每个省公司单独的表中;如图
图一:要拆分的三张表
图二:省公司表
图三:省公司项目表
图四:省公司人员表
Sub 为各个省公司拆分表()
Dim i As Integer, x As Integer, y As Integer, z