George - 

VERY Cool!  I have already implemented in one of my databases.  Thanks
for sharing the trick! 

Dawn Crosier
Application Specialist
"Education Lasts a Lifetime"
 
This message was posted to a newsgroup.  Please post replies and
questions to the group so that others can learn as well.
 
 

-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On
Behalf Of George Oro
Sent: Thursday, October 13, 2005 1:58 AM
To: [email protected]
Subject: RE: [ms_access] Re: auto default values

Try this:

'// Place this Code in your Forms AfterUpdate Event Private Sub
Form_AfterUpdate()
   Dim ctl As Control
   For Each ctl In Screen.ActiveForm.Controls
     If ctl.Tag = "Carry" Then
        ctl.DefaultValue = """" & ctl.Value & """"
     End If
   Next
End Sub

'// For every Text Box you want to Carry Foward to the new record put
Carry  ) in it's  Tag Properties

HTH.


------------------------ Yahoo! Groups Sponsor --------------------~--> 
Most low income households are not online. Help bridge the digital divide today!
http://us.click.yahoo.com/cd_AJB/QnQLAA/TtwFAA/q7folB/TM
--------------------------------------------------------------------~-> 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/ms_access/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 




Reply via email to