Lawn3.xls | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
A | B | C | D | E | F | G | H | I | J | K | L | M | N | O | P | |||
1 | CHARGED | |||||||||||||||||
2 | OUTSTANDING | |||||||||||||||||
3 | DATESCUT | |||||||||||||||||
4 | NAME | PH# | ADDRESS | DAYS | CUT | 1 | 2 | 3 | 4 | 5 | CUTDUE | |||||||
5 | BSMITH | 555-1212 | 1234Street | 7 | 6/22 | Done-Paid | 6/1/08 | Done-Paid | 6/7/08 | Done-*Owe | 6/15/08 | |||||||
6 | JDOE | 555-1212 | 5678Road | 7 | 6/21 | Done-Paid | 5/29/08 | Done-Paid | 6/7/08 | Done-Paid | 6/14/08 | |||||||
7 | HTAYLOR | 555-1212 | 8768Lane | 14 | 6/28 | Done-Paid | 6/1/08 | Done-*Owe | 6/14/08 | DUE | ||||||||
8 | OHARRISON | 555-1212 | 2255Alley | 7 | 6/21 | Done-*Owe | 6/14/08 | |||||||||||
9 | WSAMSON | 555-1212 | 8577Hill | 7 | 6/21 | Done-Paid | 6/7/08 | Done-Paid | 6/14/08 | |||||||||
10 | NWILSON | 555-1212 | 6555Skyline | 14 | 6/21 | Done-Paid | 6/7/08 | |||||||||||
11 | SATCHINSON | 555-1212 | 1244Street | 7 | 6/14 | Done-Paid | 6/8/08 | Pre-Paid10 | 6/14/08 | Pre-Paid10 | 6/22/08 | Pre-Paid10 | 6/29/08 | Pre-Paid10 | 7/6/08 | |||
12 | PWILSHIRE | 555-1212 | 5898Road | 14 | 6/22 | Done-Paid | 6/8/08 | |||||||||||
13 | GTRAMLIN | 555-1212 | 8799Lane | 14 | 6/28 | Done-Paid | 6/9/08 | Pre-Paid10 | 6/28/08 | Pre-Paid10 | 7/12/08 | Pre-Paid10 | 7/26/08 | DUE | ||||
14 | FRANGELY | 555-1212 | 3155Alley | 7 | 6/18 | Done-Paid | 6/11/08 | |||||||||||
15 | MTREELINE | 555-1212 | 8767Hill | 7 | 6/26 | New-CutDue | 6/26/08 | DUE | ||||||||||
16 | IPRALINES | 555-1212 | 6895Skyline | 7 | 6/26 | New-CutDue | 6/26/08 | DUE | ||||||||||
17 | KPADDLY | 555-1212 | 8877Lane | 7 | 6/21 | Done-*Owe | 6/14/08 | |||||||||||
18 | NYARDLY | 555-1212 | 3388Alley | 14 | 6/28 | Done-Paid | 6/14/08 | DUE | ||||||||||
19 | QFORD | 555-1212 | 9191Hill | 7 | 6/21 | Done-*Owe | 6/14/08 | |||||||||||
20 | ||||||||||||||||||
21 | ||||||||||||||||||
22 | ||||||||||||||||||
DATA |
Every customer with a cut 'DUE' (as shown in column P) is on the 'CUT LIST' sheet for sorting and printing. I've been asked for an 'UPDATE' button on the 'CUT LIST' sheet, that, once those 'DUE' cuts are completed, will find the first blank column on the above 'DATA' sheet, from col. F going to the right, for each customer with 'DUE' listed in column P (there were many more columns, deleted temporarily for the above image), change the validation list dropdown to "Done - *Owe" and enter the current date in the next blank cell to the right.
My "expertise" with visual basic is currently copy/paste, or as I often call it in my particular case, airhead level.
Can anyone help me with some code for this? =o) Pretty please?