|
Run repetitive task and frequency depends
Dear Expert,
I need to run a similar task which find/update the data in sheets "Daily", "Weekly",... But number of "Check" is different days by days ... Sometimes, it has 3, sometimes 4 and even none .... So how can I do a repetitive task based on the number of check in a column please ? In this case, it has 4 check in a column ... then do that task for 4 times is enough and stop ! Thanks for help. Expiry In Sheets LC115534 17-Feb-09 Daily Check 12.1 TR115776 17-Feb-09 Daily 11.2 GB116981 18-Feb-09 Daily Check 62.9 EQ117150 #N/A Daily 21.1 SS118845 18-Feb-09 Daily 117.4 AQ119605 18-Feb-09 Daily 24 TR120182 19-Feb-09 Daily 27 GB120268 17-Feb-09 Monthly Check 99 TR120513 19-Feb-09 Daily 24 GB120941 38 GB123547 19-Feb-09 Daily 24 GB125186 27-Feb-09 Weekly Check 37 EQ129944 #N/A Daily 84 SS130341 27-Feb-09 Monthly 67 |
Run repetitive task and frequency depends
Dim lngRow As Long
For lngRow = 1 To ActiveSheet.Cells(Rows.Count, "D").End(xlUp).Row If Range("D" & lngRow) = "Check" Then 'Do something End If Next If this post helps click Yes --------------- Jacob Skaria "Elton Law" wrote: Dear Expert, I need to run a similar task which find/update the data in sheets "Daily", "Weekly",... But number of "Check" is different days by days ... Sometimes, it has 3, sometimes 4 and even none .... So how can I do a repetitive task based on the number of check in a column please ? In this case, it has 4 check in a column ... then do that task for 4 times is enough and stop ! Thanks for help. Expiry In Sheets LC115534 17-Feb-09 Daily Check 12.1 TR115776 17-Feb-09 Daily 11.2 GB116981 18-Feb-09 Daily Check 62.9 EQ117150 #N/A Daily 21.1 SS118845 18-Feb-09 Daily 117.4 AQ119605 18-Feb-09 Daily 24 TR120182 19-Feb-09 Daily 27 GB120268 17-Feb-09 Monthly Check 99 TR120513 19-Feb-09 Daily 24 GB120941 38 GB123547 19-Feb-09 Daily 24 GB125186 27-Feb-09 Weekly Check 37 EQ129944 #N/A Daily 84 SS130341 27-Feb-09 Monthly 67 |
Run repetitive task and frequency depends
For the below code I am assuming you have this "Check" in Col D
If this post helps click Yes --------------- Jacob Skaria "Jacob Skaria" wrote: Dim lngRow As Long For lngRow = 1 To ActiveSheet.Cells(Rows.Count, "D").End(xlUp).Row If Range("D" & lngRow) = "Check" Then 'Do something End If Next If this post helps click Yes --------------- Jacob Skaria "Elton Law" wrote: Dear Expert, I need to run a similar task which find/update the data in sheets "Daily", "Weekly",... But number of "Check" is different days by days ... Sometimes, it has 3, sometimes 4 and even none .... So how can I do a repetitive task based on the number of check in a column please ? In this case, it has 4 check in a column ... then do that task for 4 times is enough and stop ! Thanks for help. Expiry In Sheets LC115534 17-Feb-09 Daily Check 12.1 TR115776 17-Feb-09 Daily 11.2 GB116981 18-Feb-09 Daily Check 62.9 EQ117150 #N/A Daily 21.1 SS118845 18-Feb-09 Daily 117.4 AQ119605 18-Feb-09 Daily 24 TR120182 19-Feb-09 Daily 27 GB120268 17-Feb-09 Monthly Check 99 TR120513 19-Feb-09 Daily 24 GB120941 38 GB123547 19-Feb-09 Daily 24 GB125186 27-Feb-09 Weekly Check 37 EQ129944 #N/A Daily 84 SS130341 27-Feb-09 Monthly 67 |
| All times are GMT +1. The time now is 03:41 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com