公司产品标准比较多，如果按照 下边的代码一个一个产品的在 “A表”中 Drawcell设置,工作量太大，Case "筛分_60目筛分" If e.Row("配方名称")="产品A" Then
If e.Row.IsNull(e.Col.Name) = False
If e.Row("筛分_60目筛分")<5 Or e.Row("筛分_60目筛分")>15 Then
e.Style = "不合格"
End If
End If
End If
If e.Row("配方名称")="产品B" Then
If e.Row.IsNull(e.Col.Name) = False
If e.Row("筛分_60目筛分")<20 Or e.Row("筛分_60目筛分")>35 Then
e.Style = "不合格"
End If
End If
End If
能不能在"B表"内把标准建好，然后再引到"A表"中，代码怎么打，以下是我的错误代码，没学过0基础不要笑啊，如果明白我的意思的，请高手帮我，谢谢。
Case "筛分_60目筛分"
If e.Row.IsNull(e.Col.Name) = False
dt = DataTables("检测项目列表").Find("[成品检测标准_配方名称] = '" & e.Row("配方名称") & "'")
If dt IsNot Nothing Then
If e.Row(筛分_60目筛分) < e.Table("B表").Row("成品检测标准_60目筛分最低值") Then
e.Style = "不合格"
End If
End If
End If
加好友 
发短信
Post By：2018/10/7 17:02:00 [显示全部帖子]
