VB programing

[Guest]

I need a cross check that will verify if several cells on a WB equal (or is +
/ - 2 units)

also that verify in another workbook also.

can some one help me.

 

[Guest]

sorry i don't understand what you want.
Could you please be more specific and give an example.
Thanks,
Sebastien

 

[kkknie]

Dim dblCheck as Double

dblCheck = Abs(Range("A1").Value - Range("B1").Value)
If dblCheck > 2 Then
'Whatever you want to do if they are out of tolerance
End If

Or if they are on different (open) workbooks

dblCheck
Abs(Workbooks("Book1.xls").Sheets("Sheet1").Range("A1").Value
Workbooks("Book2.xls").Sheets("Sheet1").Range("B1").Value)
If dblCheck > 2 Then
'Whatever you want to do if they are out of tolerance
End If

Adapt to fit your circumstances.

 

[Guest]

Thanks KKKnie, this is going to work