Darren Dick
D.Dick at uws.edu.au
Sun Jul 24 23:34:28 CDT 2005
Hi Karen Demo Sent off line See ya DD -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Karen Rosenstiel Sent: Monday, July 25, 2005 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Help with a snippet Hmmmm... I just played with this bit of code again and realized that it was duplicating the record with NotSeen checked, which duplicated the record with NotSeen checked which.... Like the picture of the little girl with a box or salt on the Morton Salt box. Regards, Karen Rosenstiel Seattle WA USA -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Karen Rosenstiel Sent: Sunday, July 24, 2005 8:32 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Help with a snippet Exactly. I was just noodling around with this and figured out how to copy and append the record with onclick: DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.RunCommand acCmdPasteAppend But I don't know how to do the rest of it. Thanks. Regards, Karen Rosenstiel Seattle WA USA -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren Dick Sent: Sunday, July 24, 2005 8:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Help with a snippet Hi Karen Am I to assume if the NOTSEEN check box is checked you would like to create a brand new 'appointment' ? Darren -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Karen Rosenstiel Sent: Monday, July 25, 2005 8:59 AM To: accessd at databaseadvisors.com Subject: [AccessD] Help with a snippet I was wondering if someone would be willing to help me with a snippet of code. I want to work with 4 fields in a sub table, as follows: Checkbox "NotSeen" Date field "NextApp" Textbox "Priority", which runs from 1 to 4 Date field "DateReschedule" What I would like to do (if only I was any good at VBA) is when NotSeen is checked, the whole record would be copied and appended. Priorities 2 thru 4 would each move up a notch, i.e., 2 would become 1, etc. DateReschedule would take the date from NextApp and... 1. For the new priority 1, add 1 day to the date from NextApp and put it in DateReschedule 2. For the new priority 2, add 2 days to the date from NextApp and put it in DateReschedule 3. For the new priority 3, add 3 days to the date from NextApp and put it in DateReschedule Finally I would like the whole record to turn red if the priority is # 1, either from this snippet's conversion or when entered directly (actually I think this will be unattractive, but my boss wants the color to highlight the priority). Is this doable in whole or in part? Thanks in advance. Regards, Karen Rosenstiel Seattle WA USA -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com