一个模板中有多个sheet，每个sheet中的标记都是一样，比如"Bonus"。
1、在BuildPageFooter事件中添加如下代码：
Select Case e.Book.TempLate
Case "奖金明细"
Select Case e.Book.CurrentSheetName
Case "总计"
e.Book.Marks("ValueAvg") = Tables("bonus_AAA30_P").Compute("Avg(Score)",_QStrBYQ)
Case "团队奖"
e.Book.Marks("ValueAvg") = Tables("bonus_AAA30_P").Compute("Avg(Score)",_QStrBYQ)
End Select
End Select
问题是： 在BeforeBuild事件中的标签如何处理呢？现在采用如下的代码都不能输出正常值。
Select Case e.Book.TempLate
Case "奖金明细"
e.Book.Marks.Add("ValueAvg", 0)
End Select
难道需要每个Sheet加的标记都不同吗？请哪位不吝指教！
加好友 
发短信
Post By：2014/1/27 9:52:00 [只看该作者]
Post By：2014/1/27 10:00:00 [只看该作者]
