macro
I need help............
I am trying to get a macro to for the following problem: there are 4 lines of information spanning from ("A9:AG12"). Columns A through AF are properties from a test. Each row is a seperate test. Column AF is the date. If any two consecutive tests are outside the specific tolorance then the production of the material must stop unless the date("AF") is different. |
macro
For RowCount = 9 To 11
If Range("AF" & RowCount) = Range("AF" & (RowCount + 1)) Then For ColCount = 1 To Range("AE" & RowCount).Address If ((Cells(RowCount, ColCount) MaxTol) Or _ (Cells(RowCount, ColCount) < MinTol)) And _ ((Cells(RowCount + 1, ColCount) MaxTol) Or _ (Cells(RowCount + 1, ColCount) < MinTol)) Then MsgBox ("Data is out of Range") End If Next ColCount End If Next RowCount "Eric" wrote: I need help............ I am trying to get a macro to for the following problem: there are 4 lines of information spanning from ("A9:AG12"). Columns A through AF are properties from a test. Each row is a seperate test. Column AF is the date. If any two consecutive tests are outside the specific tolorance then the production of the material must stop unless the date("AF") is different. |
All times are GMT +1. The time now is 05:31 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com