为什么进不了最近一项呢？

If e.Row("评优资格_结论")="不符合"  Then
    Select  Case e.Col.Name
        Case  "直接评优_结论","直接评优_理由","师德师风_思想修养_考核记录","能力水平_教学研究_考核记录","能力水平_教学活动_考核记录","能力水平_技能竞赛_考核记录","能力水平_专业成长_考核记录","能力水平_班主任工作_考核记录","出勤工作量_出勤_考核记录","出勤工作量_工作量_考核记录","工作业绩_批评与表扬_考核记录","工作业绩_教学常规_考核记录","工作业绩_听评课_考核记录","工作业绩_教学检测_考核记录","工作业绩_训练辅导_考核记录","工作业绩_中考统测_考核记录","工作业绩_管理工勤人员业绩_考核记录","工作业绩_管理工勤人员常规_考核记录","工作业绩_立岗置守_考核记录","工作业绩_宿管满意度_考核记录","工作业绩_学生教育_考核记录","工作业绩_管理工勤人员测评_考核记录","工作业绩_早晚自习_考核记录","工作业绩_督导评估_考核记录","工作业绩_临时工作_考核记录","工作业绩_宣传稿件_考核记录","廉洁自律_廉洁从教_考核记录","廉洁自律_遵章守规_考核记录","师德师风_学生评教_考核记录"
            e.text ="-"
            \'L列的计算代码
        End  Select
    ElseIf e.Row("直接评优_结论")="是"  Then
        Select  Case e.Col.Name
            Case  "师德师风_思想修养_考核记录","能力水平_教学研究_考核记录","能力水平_教学活动_考核记录","能力水平_技能竞赛_考核记录","能力水平_专业成长_考核记录","能力水平_班主任工作_考核记录","出勤工作量_出勤_考核记录","出勤工作量_工作量_考核记录","工作业绩_批评与表扬_考核记录","工作业绩_教学常规_考核记录","工作业绩_听评课_考核记录","工作业绩_教学检测_考核记录","工作业绩_训练辅导_考核记录","工作业绩_中考统测_考核记录","工作业绩_管理工勤人员业绩_考核记录","工作业绩_管理工勤人员常规_考核记录","工作业绩_立岗置守_考核记录","工作业绩_宿管满意度_考核记录","工作业绩_学生教育_考核记录","工作业绩_管理工勤人员测评_考核记录","工作业绩_早晚自习_考核记录","工作业绩_督导评估_考核记录","工作业绩_临时工作_考核记录","工作业绩_宣传稿件_考核记录","廉洁自律_廉洁从教_考核记录","廉洁自律_遵章守规_考核记录","师德师风_学生评教_考核记录"
                e.text ="-"
                \'L列的计算代码
            End  Select
        ElseIf e.Row("直接评优_结论")="否"  Then
            Select  Case e.Col.Name
                Case  "直接评优_理由"
                    e.text ="-"
                    \'L列的计算代码
                End  Select
            ElseIf e.Row("评优资格_结论")="符合"  Then
                Select  Case e.Col.Name
                    Case  "评优资格_理由"
                        e.text ="-"
                        \'L列的计算代码
                    End  Select
                End If