Modules & VBA :: Use Default Value To Store Data
Apr 23, 2014
I'm trying to use a form to store some usefull data on my database.
I'm using the DefaultValue property of the TextBoxes in this code:
Code:
Sub Comando17_Click()
Testo4.DefaultValue = """sasso"""
Testo6.DefaultValue = """sdr"""
Testo0.DefaultValue = Testo0.Value
DoCmd.Save
End Sub
Comando17 is the name of the button to run the macro
Testo4, Testo6 and Testo0 are the names of my TextBoxes
sasso and sdr are the values I want to set as Default
When I run this macro it changes the DefaultValue property on VBA local variables and the Value property, but the DefaultValue on the form structure remains unchanged.
View Replies
ADVERTISEMENT
Dec 8, 2006
I created a report database that rely's on both default data and user entered data. Unfortunately the default data is going to be different for each office and needs to be easily updated as needed. So I created a "default data table" and named it DefaultData_tbl; and has these field names in it:
Office
Phone
Address
Fax
The personnel Main form is run from the Main_tbl with the exception of the items above (which reside on the DefaultData_tbl). This default data then needs to be automatically applied into the Main_tbl, via the Main form, which has Main_tbl as it's data source. Then the user does not have to keep filling in these textboxes for each personnel entry (unless it is different for a particular reason; which they should be able to change as needed and then automatically revert back to the DefaultData_tbl for any future personnel inputs). A personnel report (to file in their personnel records) is printed and will also need to pull from this table the items listed above (unless it is changed by the user for that one person they were entering in). The report name is NIPRNet_rpt.
For instance:
Say the Office is "Marketing"...
Everywhere on the reports, tables and forms that asks for the office should automatically put "Marketing" in the spot.
Now, if I get someone who is working in Recieving today, I should be able to update those office boxes with "Receiving" (just this one time) which will also have to be updated on the Main_tbl and NIPRNet_rpt (but should NOT update the DefaultData_tbl).
Then it should automatically revert back to "Marketing" when I pull up a new user
Putting this information in the default data under properties works fine, but I am sending this out to all the offices and want them to be able to easily enter in their particular default data. I don't want to have to create 30 databases all with default data set in them already. Plus, if something changes, like their phone number, I want them to be able to update this in their default data form and it be updated for future use.
I tried putting this in the Office textbox on the Entry Form:
=[Tables]![DefaultData_tbl]![Office]
All I get in the textbox is "Name?"
I would make it a Label instead of a Textbox to associate it, but the user has to have the ability to easily change this default data inside the form as they are filling it out. This updated data is also needed to update the Main_tbl and the NIPRNet_rpt.
I am racking my brain trying to figure out what I am missing here. The DefaultData_tbl will not have more than one record in it; as all it is doing is storing the "initial setup" default data to be used in reports and forms. Anybody know what else I can try to get this to work?
View 1 Replies
View Related
Jan 28, 2015
I am writing the following code that will first of all display column headers dynamically using "Headers" field data from Access table and then find out the sum(volume) using column header and first column values. The following code works fine to display headers dynamically in Excelsheet from Access table but doesn't display sum(volume) in all the corresponding cells. As I can't attach the Access table so I have stored data from Access table to sheet named "Access Data" as attached. The sheet2 named "Report" should populate total volume .
Code:
Public Function Inputdata()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim r As Long
Dim i As Integer
[code]...
View 2 Replies
View Related
Apr 12, 2006
Hi
I am creating a contact management database.
I have set it up and now need to create an invoice section. An invoice needs to be issued every month and is worked out on a percentage of works complete. For example in one job there may be 10 items of work and for 8 of these iems 25% of the work is complete and the other 2 no work has started.
Therefore my invoice needs to be able to calculate 25% of the value of the 8 items and work out a total price to be invoiced. Each time an invoice is created I need to be able to store the invoice value and the percent value of each item complete.
Does any one have any ideas as to a good way of doing this. That is if you can undersatnd what I am asking for. Thanks for any help.
View 2 Replies
View Related
Jun 30, 2005
I have a handful of misc. data that is unique an really doesn't fit anywhere... I need it to be easily updateable, as it will and needs to change from time to time, What should I do with it?
Some of the data is a "Common Footer" that prints on ALL reports and DOES change periodically. I decided to create a common footer table with a single value and can access it from all of my reports... it works great!
However, I now have a bunch of other misc. data that I need to store, like the "Working Year" (I am going to use the field to dictate which year of info to pull the data from) "Common Header", etc. Additionally, I am considering storing formatting data such as font size (still considering this).
So with all this explained, to sum it all up, what is the best method for handling all of this misc. data? I didn't think creating a separate table for each piece was the best idea.
Thanks for your suggestions!
View 1 Replies
View Related
Sep 23, 2014
I am trying to perform a calculation within an IF then Statement. The difference is I need Access to remember a values to complete the calculations prior to setting the final answer. I think this is basic however I am a novice and can't seem to get it to work.
Code:
If [Forms]![Jobentryfrm]![StyleJobCurrentSub]![Assembly] = 39 Then
BL = ([Forms]![Jobentryfrm]![Height] * 2) + ([Forms]![Jobentryfrm]![Length] * 2) + 8
bw = [Forms]![Jobentryfrm]![Length] + [Forms]![Jobentryfrm]![Width] + 12
[code]....
View 4 Replies
View Related
Feb 20, 2014
I have a table like this :
Fields 1 --- field 2
A --- tuesday
A --- wednesday
A --- thursday
B --- tuesday
B --- wednesday
I want to end like this :
Fields 1 --- field 2
A --- tuesday,wednesday,thursday
B --- tuesday, wednesday
I was thinking of doing a loop in vba with recordset and a filter on field1 and concatenate the days of field2 in the first reccord of each letter.But my table is big so my code needs to be fast.
how to do this ?
View 3 Replies
View Related
Nov 22, 2013
I'm building a database to organize the editing of a massive report my office is working on. I've got a big table of all the sections. Each section has a unique ID and a version number. I wrote the queries so that they return only the most recent version (i.e. the Max version # of each section.) The results of the query appear in a subform.
I was able to use VBA to allow the user to double click on the record in the subform, and look at the record in another form. (I was really proud of this.)
Anyway, it turns out what I need is to double click on the record in the subform, and create a new record based on this record, but increment the version # by one.
I've created an unbound form for this, and googled around. I need to use VB to store the variable, and then put it in the unbound text box.
View 11 Replies
View Related
Mar 11, 2006
Sorry if this is an elementary question, but here goes.
What I want to do is have Access run a query based on the user name "taken from a login screen". That query will return some values such as what team the Supervisor is responsible for, what days off his team has etc...
This information will be used to display all other queries that particular sup runs. When another sup signs in obviously the results will be different
And onto the problem
I have the query running and displaying the result in a datasheet view. I created this to see if the queries work. Now what I would like is to do away with this query (it pops up at startup) and have access save the user name in memory instead of running this query. I also need to figure out how to reference this "user name" piece of data, that will be in memory on the queries.
would appreciate any help you can give on this topic. I have been trying to solve this issue for a loooooong time.
thanks again,
Ricky
View 2 Replies
View Related
Jul 28, 2005
I would like to know if I can control what field the check box enters the -1 value in my record depending on a value from another field in that record.
In my table called workbook I have fields called, phone type which is a text field, wall and wm entry which are both yes/no fields. I want to put one check box on my form to check when a wall mount is needed for the device. The thing is there are two different wall mount sizes. So I need to check the phone type field on my form, if the value is ENTRY then I need to have it enter -1 in the WM Entry field. If the field anything other than ENTRY then the -1 value should go in the WALL field.
Can this be doen and how do I code it?
Thanks in advance
View 4 Replies
View Related
Jun 10, 2015
i want to browse the files from a form and then store hem to the database.i have the following code, i can show the file path to the text box but i don't know how to store the file or how to upload the file to the database.
Dim f As Object
Dim strFile As String
Dim strFolder As String
Dim varItem As Variant
[code]....
View 5 Replies
View Related
Dec 11, 2013
I want to store a query into a table, which I will delete later on. But somehow it shows me an error: Data type conversion error at the qdf = CreateTableDef assignment line.
Code:
Public Sub LF_Query()
Dim i As Integer
Dim strSQL As String
Dim qdf As TableDef
[Code] .....
View 2 Replies
View Related
Nov 10, 2013
I am trying to add an attendance records to my database but cannot figure out how best to do it..I already have a 'children' table were all the kids info is stored and have created a 'roll' table.
i want to be able to open a form and search first and/or last name from the 'Children' table, then be able to save both first and last names and the date into the 'Roll' table. (then open reports etc later based on dates)how to pull data from one table and store it in another.
View 3 Replies
View Related
Mar 11, 2013
I'm thinking of 2 different ways, but not sure how Access will handle them.
1) A table that maintains the start and stop date of the relationship (i.e. employee has a job title from a start date to an end date).
This is the ideal, but I'm concerned about the number of records. The database will store 3,000 employees and I'd estimate around 2000 changes a month can occur to the employee data (transfers, hires, promotions, terminations and all cascading changes on dependent information).
2) A different database for each month/year. (i.e. Employees_March2013, Employees_April2013)
I don't have concerns about the number of records, but I'm not sure how the front-end will work with multiple back-end databases. Is there an easy way to setup a form to choose which "effective date" of employee information you'd like to choose and have it link to the correct back-end at that point before running a query/report?
View 14 Replies
View Related
Oct 10, 2012
I have 2 tables one, Contacts, primary key ContactID this table contains names, addresses etc and one group called Form primary key Form ID, foreign Key Contact ID. I want to store the related contact ID in my form but display firstname ad surname from Contaacts list. This works fine when I am selecting name. List box shows 2 columns with correct data but when I recall the form after making other entries it only displays the firstname. The correct ContactID is stored. Why does this happen.
If I can get this working I would like to concatenate the Firstname and surname to make it more readable but don't know where to begin.
View 3 Replies
View Related
Mar 11, 2014
I have a folder in which there are PDF files stored. Now in the Form, there is a combobox and I want the code so that when a Form is loaded then add all those PDF file names(only first 9 letters of that) in the combobox.
e.g if the PDF file name is ABCDE1990-YYY then add ABCDE1990 in the combobox. So if there 10 PDF files in the folder then add 10 names in the combobox.
View 5 Replies
View Related
Apr 10, 2015
I want to use an array to store data from a list box into a variable. I want it to be able to store one value, or multiple values, depending on what is selected.
Main problem: this list box feeds off a table which has employee names and their e-mails. The list box itself only shows the names, and when I select what I want the array to store is their e-mails, not their names.
Code:
Dim strNames As String
Dim varItem As Variant
Dim intCount As Integer
For Each varItem In Me.lstNames.ItemsSelected
intCount = intCount + 1
Select Case Len(strNames)
[Code] ....
That code successfully displays the item I selected, but only displays the name. I need to make it look in the table and get me column #2. I also want it to be able to select more than one item at a time.
View 5 Replies
View Related
Oct 15, 2006
Hello,
The title says it. I want to store 500KB text data into a memo field. How can I do that?
Someone told me there is no limit on the size of a memo field, up to the maximum for a .mdb file of 2GB!!!
Your help would be greatly appeciated.
View 9 Replies
View Related
Oct 7, 2014
Is it possible to create a field in a table that stores only two possible data choices: a check or null value ?
View 6 Replies
View Related
Jul 2, 2014
In my form, when a button (cmdContactedToday) is clicked, a text field to the left (txtDateContacted) is updated with today's date.
However, before this happens, I want the the current date in txtDateContacted to get stored in another (hidden) text field (txtPreviousDate)
Then when another (undo) button (cmdUndoDate) is clicked, the date in txtDateContacted should get replaced with the date in txtPreviousDate.
I've made it as simple to understand as I could.
View 14 Replies
View Related
Dec 2, 2012
How to insert a timer in the PropertyFrm Form in the Access Database attached to this message. When a user opens the PropertyFrm form I want the timer to record the number of hours, minutes, and seconds each user spend time on a record including the current dateand have the data stored in the Timer table.
When a user goes to another record, I want the timer to reset and store the hours, minutes, seconds, and current date on another record in the Timer Table and so on. If the fields and data types in the Timer table is not created properly.
I do not want the time and current date to be displayed on the PropertyFrm Form. I want the information to be stored in the Timer table.I do not want the user to see the hours, minutes, seconds and current date information on thePropertyFrm Form.
View 2 Replies
View Related
Feb 7, 2014
I am using this code
DoCmd.OutputTo acOutputReport, "rptFilter", "Excel97-Excel2003Workbook(*.xls)", strFilename, True, "", , acExportQualityScreen
With the OutputFile set to "" so the user can select the directory on where they want to store the exported template. I'm trying to figure out if I could get the file path and the file name and store it on a string so I could use it for something else.
View 4 Replies
View Related
May 7, 2013
My department handles all two-way email communication with our customers. We have 8 different email addresses that we use depending on the customer service issue. I'm looking for a way to continuously collect 3 pieces of data from every email that is received: 1) Date Received, 2) Time Received, and 3) To Field (which of the 8 email addresses it was sent to).
As you can imagine the collection of this data to look for trends to assist with staffing needs, as well as analyze build reports for the company to review. I've been working with my IT department on this but they are not sure where to start. My guess is that I need to have them collect the data as it is coming into the email server, right? I'm good with VB and I've built some VBA scripts recently that collect Outlook information, but these only work if the computer I'm using stays on all the time which is not always practical. We'd like to have this database stored on one of our shared drives which collects this data indefinitely from our email server.
View 1 Replies
View Related
Oct 1, 2013
I have a very large Access application and use a hidden "main switchboard" to store data such as the current customer ID. Prior to the advent of tempvars, I embedded a key control into many query's underlying combo boxes, list boxes and forms criteria:
"Forms![main switchboard]![currentcustomerid].
The problem arises when the user quits the application on with forms using this in their underlying query(ies). As far as I can tell, the application closes forms in the order in which they were opened, so the "main switchboard" closes first. Then, for some reason, the current form has a requery and the user is presented with a prompt to enter the parameter "forms![main switchboard]![currentcustomerid]. I tested and found I could replace the criteria reference to a tempvar to "fix" the problem. I wonder if there would be a way to open every query in design view and do a search and replace on the criteria statement.
View 9 Replies
View Related
Mar 12, 2014
Basically, what's the best practice or how do we store a query's value into an array then checking what the max or min value is and how to check if let's say "4" is in the array?
View 1 Replies
View Related
Feb 9, 2015
I have two tables
1) has email address, and Store ID
2) has multiple records per store
I need to write a procedure to send a separate email to each store that contains the records found in table 2 ( excel format).
View 3 Replies
View Related