[四个合格个人发言材料四个合格党课讲话稿]四个合格个人发言材料篇1 中国共产党的领导是中国特色社会主义制度的最大优势，加强党的领导关键是坚持党中央的集中统一领导。只有增强政治意识、大局意识、核心意识、看齐意...+阅读

Sub 查找不合格项（）

Dim I As Integer, J%, lastrow%

lastrow = Range(＂B65536＂).End(xlUp).Row

For I = 1 To lastrow

For J = 2 To 7

If Cells(I, J).Value Cells(I, 1).Value = ＂不合格＂

Exit For

Else

Cells(I, 1).Value = ＂合格＂

End If

Next J

Next I

End Sub

第三个问题可以修改一下代码然后再运行。为了个别特例再去编写判断的代码，不如直接先运行完B:G区域的，然后再改下代码再运行一次。

不明白这句话的意思：另外第3个写那代码应该要简单许多吧，因为只有一项的，还有总共可能只需要50多行。能解释一下吗？或者Hi我。

Sub 查找不合格项（）

Dim I As Integer, J%, lastrow%

'lastrow = Range(＂B65536＂).End(xlUp).Row

'如果不需要判断最后一行的行号，则上面这句不要，直接修改下面的语句

For I = 1 To 55

For J = 2 To 7

If Cells(I, J).Value Cells(I, 1).Value = ＂不合格＂

Exit For

Else

Cells(I, 1).Value = ＂合格＂

End If

Next J

Next I

'增加下列内容，用来判断H6:K6中的分数，结果写入H3

For J = 8 To 11

'因为位置明确，无需判断。

If Cells(6, J) Range(＂H3＂) = ＂不合格＂

Exit For

Else

Range(＂H3＂) = ＂合格＂

End If

Next J

End Sub

以下为关联文档：

怎样在excel中统计某个字符的个数函数怎么用COUNTIF函数。 数据（a） 数据（b） apples 32 oranges 54 peaches 75 apples 86 公式 说明（结果） =COUNTIF(A2:A5,＂apples＂) 计算第一列中苹果所在单元格的个数 （2） =COUNTIF(A2:A5,A4)...