![]() |
IF statement
I want to evaluate a given cell in a given row; if value exceeds 12 select the row for subsequent printing. If value <12, add first cell' value to previous cell (in same row) and re-evaluate ... if that valu 12, then, select the row for *printing*. If either value above <12 DO NOT select for printing. Apply same logic to all rows and then hav selected rows PRINT OUT. Is this possible? I DO want to add contents of previous cell (same row) IF first resul is less than the desired value. Thanks in advance -- billansle ----------------------------------------------------------------------- billansley's Profile: http://www.excelforum.com/member.php...fo&userid=2601 View this thread: http://www.excelforum.com/showthread.php?threadid=39567 |
IF statement
Here is one interpretation. As written, works on column E
Sub AB() Rows.Hidden = False lastrow = Cells(Rows.Count, 5).End(xlUp).Row For i = lastrow To 2 Step -1 If Cells(i, 5).Value < 12 Then If Application.Sum(Cells(i, 5)(0).Resize(2)) < 12 Then Rows(i).EntireRow.Hidden = True End If End If Next If Cells(1, 5).Value < 12 Then Rows(1).Hidden = True Activesheet.Printout End Sub -- Regards, Tom Ogilvy "billansley" wrote in message ... I want to evaluate a given cell in a given row; if value exceeds 12, select the row for subsequent printing. If value <12, add first cell's value to previous cell (in same row) and re-evaluate ... if that value 12, then, select the row for *printing*. If either value above <12, DO NOT select for printing. Apply same logic to all rows and then have selected rows PRINT OUT. Is this possible? I DO want to add contents of previous cell (same row) IF first result is less than the desired value. Thanks in advance. -- billansley ------------------------------------------------------------------------ billansley's Profile: http://www.excelforum.com/member.php...o&userid=26015 View this thread: http://www.excelforum.com/showthread...hreadid=395670 |
All times are GMT +1. The time now is 01:15 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com