主题：请教下，如何实现输入的数据与指定的数据进行比对，如果不符合则提示

你好老师，表格中有名称为：工作压力、要求整定压力、整定压力和密封实验压力三列，我想实现下列功能，请你给帮助下：

老师，当有多列数据同时等于要求整定压力时，代码如何更改下，例如，现增加了，第一次实际整定压力列，第二次实际整定压力列，第三次实际整定压力列，在要求整定压力输入数值后，这三列也同时出现数值

麻烦给加上一行让数值为小数点后2位的代码，当存在第3位小数时，不舍去全部进位，

老师，你说的这个我查阅了，但我是想只要小数点第3位存在数值，就直接进位到第2位，这个没想到初到

有要求整定压力、密封实验压力二列，我用代码：If e.DataCol.Name = "要求整定压力" Then

那老师，想实现直接向上进一位的功能，我这样写代码可以吗：

If e.DataCol.Name = "要求整定压力" Then

    e.DataRow("密封实验压力") = e.DataRow("要求整定压力") * 0.92

     Dim a As String ="密封实验压力"

a = math.Ceiling(a * 100) / 100

msgbox(a)

            End If

谢谢老师

代码不能使用，请老师看看是哪儿出现问题了