Solved

Access 2010 Change Default Value for a Table field

Posted on 2013-01-05
7
1,680 Views
Last Modified: 2013-01-06
Hello experts,

I have some number fields in my table that have Default Values set in the Field Properties window. These fields and the default values in them are required as a minimum for every record saved.

Every now and then, these default values will need to be changed. The users of this database are not very technically savvy. I don't want them bumbling around in design view trying to change these values. I need a text box + button press way to change the default value for these specific table fields.

Is this possible?

My database is already built, so I am trying to avoid major changes.

Thanks in advance.
0
Comment
Question by:Jpoppi
7 Comments
 
LVL 16

Expert Comment

by:Kalpesh Chhatrala
ID: 38746679
0
 
LVL 84

Accepted Solution

by:
Scott McDaniel (Microsoft Access MVP - EE MVE ) earned 250 total points
ID: 38746737
You can do this in VBA like this:

Set db = CurrentDb
db.TableDefs("YourTable").Fields("YourColumn").Properties("DefaultValue") = "0"

Note that if the DefaultValue has NOT been previously set for the column, you'll get an error (The property does not exist until you create it).

You should also insure that all users are out of the database before doing this.
0
 
LVL 29

Assisted Solution

by:IrogSinta
IrogSinta earned 250 total points
ID: 38746745
If you have a table called Inventory with a field called Markup, you can add a textbox to  your form called txtDefaultMarkUp and a button called btnChangeDefaultMarkup.  In the button's OnClick event you would have this code:

Private Sub btnChangeDefaultMarkup_Click()
    CurrentDb.TableDefs("Inventory").Fields("MarkUp").Properties("DefaultValue") = txtDefaultMarkup
End Sub

Open in new window


Be sure that the table is not open.  If you have it bound to a form that's open you will get an error so close those forms first.
0
Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

 
LVL 1

Author Comment

by:Jpoppi
ID: 38746757
Thanks everyone for your responses.

I shall try these methods out straight away. :)
0
 
LVL 29

Expert Comment

by:IrogSinta
ID: 38746765
In addition, if you want to add the textbox and button to a form that is bound to the table you want to change, you would need to set the form's RecordSource first to a null string, then restore it after changing the default value.
0
 
LVL 47

Expert Comment

by:Dale Fye (Access MVP)
ID: 38747204
If this is a multi-user database, the challenge is that you have to make sure users are not using the table you are trying to modify.  Another way to deal with this is to maintain a separate table (tbl_Defaults) in your database with fields: FormName, CtrlName and DefValue.

Then, you can create a separate form for editing these values (not included in sample db).  You can place a "Defaults"  button on an Admin form or even on the particular form where you are entering the data.  When the user clicks this button, you open frm_Defaults using a WHERE condition that limits the continuous forms RecordSource to those where the [FormName] field matchs the name of your form.

Finally, in the form where the users are actually entering the data (frm1 in the example), you can use the Form_Current event to set the value of the controls on the form, rather than setting the default value of the field.  This gives you the flexibility of setting these defaults at run time and having them work for all users in a multi-user environment.

I've used the Eval() function to assess the value of the data entered in your DefValue field, since this must be a text data type.  If the Eval() function generates an error, it is because the default value is a string, and the code jumps to the error handler to process strings.

Take a look at the attached as an example.
DefValues.accdb
0
 
LVL 1

Author Closing Comment

by:Jpoppi
ID: 38749477
Thanks experts for your input.

I was able to use the db.TableDefs solution in my database. These default values won't be changed often, and when they are changed, it will be while no other users are using the database. This was an easy and simple fix for a beginner like me.
0

Featured Post

Threat Intelligence Starter Resources

Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

Join & Write a Comment

Slowly Changing Dimension Transformation component in data task flow is very useful for us to manage and control how data changes in SSIS.
Load balancing is the method of dividing the total amount of work performed by one computer between two or more computers. Its aim is to get more work done in the same amount of time, ensuring that all the users get served faster.
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string. Specify the first argument, which is the expression to be returned: Specify the second argument, which …

746 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now