小学三科成绩统计表.xlsm

【文件属性】：

文件名称：小学三科成绩统计表.xlsm

文件大小：65KB

文件格式：XLSM

更新时间：2023-03-06 13:04:17

excel 成绩册

三科成绩统计表 Sub aaa() If Sheets.Count > 2 Then For i = 3 To Sheets.Count Application.DisplayAlerts = 0 Sheets(Sheets.Count).Delete Application.DisplayAlerts = 1 Next End If Dim d As Object Dim arr As Variant Dim brr() Set d = CreateObject("Scripting.Dictionary") ………………………………………………