Hello All
Please i need a VBA code for the routine process below, let me know if your required further details. also attached is a sample of the report.
- Convert to numbers Group 1, Group 2 and Group 3 (columns AC, AD, AE) by selecting each column , then “Data” then “Text to column” then Next, Next and Finish
- Convert From Range and To Range (columns Z and AA) by selecting each column, then“Data” then “Text to column” then Next, Next and Finish
- Label column AF as TOTAL
- Add formula to column AF =IF(AND(AC2="",AD2="",AE2=""),"Blank",(SUM(AC2:AE2))) and copy that formula to the end of the report
- Label column AG as OUT OF ORDER
- Label column AH as Reviewer Notes
- Add Filters to all columns
- Filter AF by Blank and add FALSE to column AG. Under AH add User Not part of approval rules
- Filter AF by 0 add FALSE to column AG. Under AH add No approval Rules set up
- Filter AF by 2 & 3 add FALSE to column AG. Under AH add Multiple approvers required
- Filter AF by 1 these are the potential out of order items
- If H, I J, L, M & N (create, modify and approve single or templates) are all blank, add FALSE to column AG. Under AH add No User Permissions
- If Seg Payments and Seg Recurring (columns O & P) are both TRUE (client cannot make and check) add FALSE to column AG. Under AH add Segregation of user permissions
- If Seg Payments and Seg Recurring (columns O & P) are both FALSE (client can make and check) add TRUE to column AG. Under AH add No Segregation of user permissions
- If To and From amounts (columns AA & AB) are less than $10,000 add FALSE to column AG. Under AH add To amount less than $10,000
- Confirm Out of Order column AG have no blanks as input of TRUE or FALSE must be entered for each line.
- If any are TRUE, there is an out of order that must be investigated.
- If all are FALSE, the review of AT permissions is complete and ready to report to Davide/Michelle once the full review is done.
Thanks