Msg Box for any cells greater then 1st cell in the row

[markmeadows1]

ok if i have 5 rows

A1= 7
check the row b1:z1 and if any cell greater the cell A1 >7 return msg over limit
same for the rest of the rows
A2= 5
A3= 9
A4= 6
A5= 8

any help would be great

 

[markmeadows1]

the code works but some days are over the limit which is aproved for one day but the code keeps picking it up then fails on new entries

so row 2 is already over the limit on one or two days

row 8 is not over the limit but if i make it go over it shows that row 2 is over which it is but doesnt show that row 8 is also now over



i thought this might be a pain its driving me crazy

thanks for your help ive been fighting this for what seems a life time

 

[meldoc]

Hi Mark

Try this.

<font face=Courier New><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> Worksheet_Calculate()<br>  rcount = ""<br>  <SPAN style="color:#00007F">For</SPAN> i = 1 <SPAN style="color:#00007F">To</SPAN> 5<br>    <SPAN style="color:#00007F">If</SPAN> WorksheetFunction.Max(Range("B" & i & ":Z" & i)) _<br>      > Range("A" & i) <SPAN style="color:#00007F">Then</SPAN> rcount = rcount & i & ", "<br>  <SPAN style="color:#00007F">Next</SPAN> i<br>    <SPAN style="color:#00007F">If</SPAN> rcount <> "" <SPAN style="color:#00007F">Then</SPAN> MsgBox "Rows(s) " & rcount & "Over Limit"<br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br></FONT>

 

[markmeadows1]

https://docs.google.com/leaf?id=0B9Q9tdW8JrU9YTkxMmVkNDQtNTllYy00MTI2LTk1MzQtZjlmZWNiYzA2MzRi&hl=en

thanks mate but everytime i enter a holiday i get the message. i understand if you want to walk away at this point but if it helps i uploaded the file to google docs if that helps

but like i said if you want to just walk away thanks for you help im learning new stuff from this site all time

again thanks for your help

mark

 

[meldoc]

How do we decide which of the over limit values, to ignore and which to report?

 

[markmeadows1]

your right mate i wasnt thinking just needed a fresh set of eyes

i will set up a new team called over the limit and and book them as X with a 100 limit i will change the message to Over Limit book as aproved over managers aproval reqiured

thanks for your help mate

are you any go with vlookups lol
look for all X and report names and the dates for a report page lol

youve been a great help

BIG thanks
mark