作者: soyoso (我是耀宗) 2020-03-01 17:51:00
宏，循环，worksheets.add来新增工作表，worksheet.name更名，复制贴上方面range.copy或range = range.value，看是否要带格式，复制范围方面工作表函数match或range.find找列号或储存格如已经有这50个工作表且名称都同分组小计字段的话函数cell info_type 以filename，mid配合find或search来取得工作表名称(固定长度就right)，取得后match 工作表名称和工作表名称 合计的列号，有这二个列号的资讯就可以函数offset、index或indirect配合row或column回传；这二个列号相减加1为列数，判断，不符合时回传空字串""