调试一下
If e.Col.IsString AndAlso e.Table.Cols.Contains("CMID") AndAlso e.Row.IsNull(e.Col.Name) = False Then
output.show("1=" & e.Col.Name)
If e.Row("CMID") = _CMID_CMID Then
output.show("CMID=_CMID_CMID")
Select Case e.Col.Name
Case "器型"
If e.Row(e.Col.Name) <> _CMID_器型 Then '如果该列的值不相符
e.Style = "差异" '那么用"差异"样式绘制单元格
End If
Case "釉色"
If e.Row(e.Col.Name) <> _CMID_釉色 Then '如果该列的值不相符
e.Style = "差异" '那么用"差异"样式绘制单元格
End If
Case "花面"
output.show("花面")
output.show("|" & e.Row(e.Col.Name) & "|" & _CMID_花面 & "|")
If e.Row(e.Col.Name) <> _CMID_花面 Then '如果该列的值不相符
e.Style = "差异" '那么用"差异"样式绘制单元格
End If
加好友 
发短信
Post By：2022/9/24 9:48:00 [显示全部帖子]
