Option To Specify An Item That Is Not Listed

Jun 9, 2006

Hi everyone,

I'm building a database that will allow me to enter medical information about patients. On the present form (paper) one of the question asks about the medical history of the patient with 7 available options( Diabetes, Cardiac, HIV etc). The 7th option is 'OTHER' and the patient is supposed to specify what Other refers to.

How can I translate this to an Access form?

I am thinking of a list of the 7 options, but when option 7 is selected; the user should be prompted to enter a specific disease.

QUESTION?
How can this be achieved, and how should the table be designed to accept this entry?


All help appreciated

Thanks

Will

View Replies


ADVERTISEMENT

Forms :: Include Option In Combo Box To Create A New Item

Jun 20, 2013

I have a form with a combobox whose list items are taken from a table of currencies (called tblCurrencies)

Row Source = SELECT [tblCurrencies].[Ccy] FROM tblCurrencies ORDER BY [Ccy];

Problem is, there may come a time when the currency they want to select is not yet part of the tblCurrencies table, and needs to be added. For simplicity, I'd like to have an additional option in the dropdown (perhaps at the bottom) to specify a new currency.So an additional list item (e.g. 'Add New...') which when selected could prompt a subform where the user could specify the new currency (and any other relevant details specific to that currency) which can be programmatically added to tblCurrencies.how do I get that extra option into the list items for the combobox?...

View 2 Replies View Related

Forms :: How To Get Only One Item In A Combo Box When Using Table / Query Option

May 1, 2013

How do I get only one item in a combo box when using the Table/Query option (ie No Duplicates). I want only one of each field with no duplicates.

View 2 Replies View Related

Modules & VBA :: How To Have A Shortcut Option When Right Click On Each Item On List Box

Aug 1, 2013

how I can have a shortcut option when right click on each item on the list box. So I got my answer with below code that opens another form "frmshortcut" with a listbox inside that shows list of options like "new task" , "edit item" . Now my problem is (like attached picture) the shortcut list (frmshortcut) will be open in another place when I right click the mouse, it is far from location of click. Also it shows some default in access when I right click in the listbox ("subform", "cut", "copy"), actually I do not like it shows these, just I like it shows shortcut list I have defined by the list box.

Private Sub ItemList_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Const RIGHTBUTTON = 2 If Button = RIGHTBUTTON Then DoCmd.OpenForm "frmshortcut"
' DoCmd.OpenForm "frmshortcut", acNormal, , , , acDialog
Forms!frmshortcut!txtparameter = Me.ItemList.Value
End If
End Sub

View 1 Replies View Related

Setfocus On Repeating Item/accessing A Specific Item

Aug 18, 2006

I have a form that simply lists the items:
DEPARTMENT_NBR and DEPARTMENT_NAME

In the table: DEPARTMENT_TBL

When I edit the field DEPARTMENT_NBR and it is in error (must be between 01 and 99) I want to put out a message in a MSGBOX and SetFocus back on the DEPARTMENT_NBR.

I coded the MSGBOX with vbokonly and then DEPARTMENT_NBR.SetFocus, but after the message displays and enter is hit for the ok the cursor jumps to the DEPARTMENT_NAME on the current line. Is there a way to get the SetFocus to work properly on repeating items like this? I can never seem to get them to perform the same as they do on non-repeating items.

Thanks for your help.

HERE'S THE EXACT CODE:
If IsNumeric(DEPARTMENT_NBR) = False Then
If DEPARTMENT_NBR <> "00" Then
MsgBox "DEPARTMENT NUMBER must between 01 and 99.", vbOKOnly
DEPARTMENT_NBR.SetFocus
GoTo DEPARTMENT_NBR_EXIT (exits the paragraph skipping other checks)
End If
End If

Also, is there a way to look at a specific item in a list like that? IE. I want to reference the 3rd row's DEPARTMENT_NBR. Thanks.

View 4 Replies View Related

Show Record If Our Group Is Not Listed

Oct 19, 2006

I have a query based on a table that has the fields as shown below. When I run the query, I will get a separate record for each group as shown below.

prb_no | seq_no |commitment_user_group_cd
602 |3 |ERC
602 |3 |MCE
602 |3 |SRG
602 |4 |MCE
602 |4 |SRG
602 |5 |SRG
602 |6 |MCE

I would like to use a query to show only the records where "SRG" is not listed and where there is another group. So in the example data above, I would like the only record to show in the query to be the last record because it's the only one where SRG is not listed along with another group.

The logic behind this is when a problem is initiated and a group assigned, we do some things and document the results. So I am only interested in the records where we have not documented our results too.

Does anyone know how I can do this with a query?

Thanks,
Jim


I want the query to only show the data where there is a user group

View 6 Replies View Related

Required Field Property Is Not Listed

Jan 3, 2007

We just upgraded to Access 2003 and I am creating a new database and in my Form... I was trying to set the REQUIRED FIELD PROPERTY to YES, but when I click the Properties of each field, it's not listed.

Has this been removed?

View 3 Replies View Related

Required Field Property Is Not Listed

Jan 3, 2007

We just upgraded to Access 2003 and I am creating a new database and in my Form... I was trying to set the REQUIRED FIELD PROPERTY to YES, but when I click the Properties of each field, it's not listed.

Has this feature been removed?

View 2 Replies View Related

Reports :: Field Not Listed To Add To Report

May 8, 2013

I have created a report but discovered that I need to add a couple more fields.

I created a query for the one field and the other field I added to the existing queries.

Neither field is listed in the "add existing fields" drop down list. The fields have been added to the corresponding forms and tables.

How can I add these two fields without creating a whole new report?

View 2 Replies View Related

Tables :: How To Add Fields Not Listed In A Combo Box

Oct 5, 2012

I have a list box with 5 items and need to design an option for a user to add a value that is not listed. how will the new fields be added to the table?

View 1 Replies View Related

Modules & VBA :: Import Files Listed In A Table

Jul 20, 2015

I have a folder that gets updated with a few new xml files every day. I need to import the data in these files into a table. The names of the files to import is in a field (FName) in a table (tblFiles).

The code that loads up the files is this:

Application.ImportXML DataSource:="C:ImportXML FILES" & FileName & ".xml", _
ImportOptions:=acAppendData

Up until now I specify the name of the file in an inputbox, so I have to enter a bunch of names to get it done.

I am looking for a way to get the filename from the table and then load up the file automatically.

View 1 Replies View Related

Modules & VBA :: Listed Box Pass Selected To A Sql Where Statement

Sep 11, 2013

I am trying to pass the results of what is selected in a list box to sql through an ado statement, when i select one result i can pass the value with no issue, when i select multiple item i get a run time error incorrect syntax near ';' i am guessing it is passing the data as a csv to sql and the where statement does not like that as criteria but i am not sure how to handle that either in vba or on the sql side.here is my vba code from access

Private Sub Command49_Click()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strItems As String
Dim intItem As Integer
For intItem = 0 To List45.ListCount - 1
If List45.Selected(intItem) Then
strItems = strItems & List45.Column(0, intItem) & ";"
End If

[code]....

View 3 Replies View Related

Modules & VBA :: Deleting Record And Then Delete Listed File?

Jan 7, 2015

What is the correct syntax that would delete a file when the record is deleted. The file's path is listed in a record field, MailLocation. Every time I try this code, I receive an error!

I've tried the below, and number of iterations, including calling the killfile differently (me![MailLocation], me.MailLocation).

Code:
Private Sub Form_AfterDelConfirm(Status As Integer)
Dim KillFile As String
KillFile = me!MailLocation
Kill KillFile
End Sub

View 6 Replies View Related

Modules & VBA :: Find Field Listed In Queries And List Them

Oct 11, 2013

I have no experience with Access Modules which I think I need to find all the queries that reference a field, in this example: LAWSON_LHSEMPDEMO.R_STATUS

I would like for the module to list all the queries for me that reference this table and field of "LAWSON_LHSEMPDEMO.R_STATUS"

Is there an easy way to do this?

View 4 Replies View Related

Reports :: Insert A Barcode ActiveX Control / But It Is Not Listed

May 30, 2014

I am wanting to insert a Barcode ActiveX control, but it is not listed. In an instruction video, after clicking on ActiveX Controls, the one named "ABarcode ActiveX" is at the top of the list.=how I can obtain this.

View 2 Replies View Related

Queries :: Order To Get A Sum Of Volume With Only One SKU Code Listed In Column 1

Jun 21, 2013

I created a query, and in field one i have a list of SKU codes (of which many are repeats), and in field two I have their corresponding volumes. In Fields 3-5 I have some various algebraic calcuations.

Now, in order to get a sum of the volume with only one SKU code listed in column 1, I use a group by on the SKU code, and a sum for the volume. When these are the only fields in the query, this works great. But when I add in the other calculated fields, the run query returns to showing each SKU code multiple times, and shows the volume and the calculations correctly. When I change the other calculated fields to Sum, then I get the aforementioned overflow error and no output at all.

Is there a way to both set it so that the output is only showing one SKU code, the total volume for that SKU, and the weighted average output of the other calculations in one query?

View 1 Replies View Related

Create Check Boxes/Option Buttons/Option Group Using VBA

Mar 14, 2008

I’m really stuck on how to create: Check Boxes/Option button/Option Group in VBA.

Could someone help on either all of them or some of them please?

Thanks

Richard

View 2 Replies View Related

Queries :: Conditional Formatting On Column Not Listed In Crosstab Query

Mar 26, 2013

I have a simple crosstab query:

FirstName and Surname as Row Headings.
Date as Column Heading.
OnShift as a Value (Count).

These are from the table DailyActivityLogs. Also in that table is a choice field called Weather that lets you choose the conditions that day (Weather, Work, Part Weather, Subbed).

This is the report the crosstab query generates:

What I would like to do is colour the Count fields depending on what the weather was that day. It seems possible, as Weather sits in the same table, but the field Weather isn't in the crosstab query.

Can I do this?

View 3 Replies View Related

Blank Option (radio) Buttons In Option Group

Aug 18, 2006

I am using an Access database for a foreign language dictionary project.

One of the forms I use is populated by a query (qryLemmaTable) to retrieve information from tblLEMMA.

This form works precisely as I intend it to work, but there is a glitch on it that is driving me mad.

The form in question has an option group with 11 radio buttons that correspond to the parts of speech associated with each word in tblLEMMA.

When I click on the button optAdjective I apply a filter and the only records that are displayed are adjectives. (The same applies for Nouns, Verbs, Prepositions etc.)

Here is the glitch: even though the radio buttons apply the filter correctly, no “black spot” appears in the button. Other signals on the screen let me know what word type is selected, so I can accomplish what I want, but I want the “black spots” too!

Perhaps this will be a clue: For each radio button I use the following code in the GotFocus event.
Me.FilterOn = False
Me.Filter = "wordtype = 'A'" ‘(or N, etc)
Me.FilterOn = True

And this for the Lost Focus event
Me.FilterOn = False

Thanks for the help.

View 3 Replies View Related

Select Option Group Option Based On Checkbox Value

Aug 22, 2005

Hi

I've got an Option Group with 3 options; Yes, No and Future.

I also have a range of Check Boxes; 1 for every day of the week.

When one of the check boxes is selected I want the Option Group to change to Yes.

Currently, the Option Group defaults to Future and No will only be available by manually selecting it. This doesn't need to be changed.

Any help will be greatly appreciated!

Cheers

View 2 Replies View Related

Convert Listed Dates To Duration To Calculate Equipment Rental Fees

Apr 7, 2015

I'm new in access I working on DB for my company equipment

I used tables and queries and reached to the following query

Query name (02-By Project)

KSC_NO From_Project To_project Date_of_Trans
K-01-037 52500 12013 02/14/2014
K-01-037 12013 52500 03/31/2015
K-01-037 52500 12013 04/07/2015
K-01-129 52500 12013 03/03/2015

I want to make query to give me the following

KSC_NO IN_Date Out_date Duration (months)
K-01-037 02/14/2014 03/31/2015 13.6667
K-01-037 04/07/2015 Today 0.0333
K-01-037 03/03/2015 Today 1.2

Is that possible?

View 5 Replies View Related

Forms :: Option Group - Warn User When Neither Of 2 In Option Group Not Ticked?

Jul 25, 2013

I stumbled upon the Option Group function just yesterday and, happy as a clam, I created a group with 2 options in radio button style. I assigned the values to a field called Registration_Type as the 2 options are "Confirmed Registrants" and "Prospective Attendees".

[Great. That part works well. When I look at the table, a 1 or a 2 is in that field so it's great to know how to control accidental ticking of radio buttons (previous 450 records or so didn't have this option group functionality so one might easily tick one of the buttons. So one part of controlling option group I know I can handle via the table itself for now.]

The challenge is how to ensure the user always ticks one or the other ... I went back to the main table and tested the 'required entry' option for the Registration_Type field but forcing an action like this is not ideal in my mind. The usual error message vagueness for the average user is no good and I don't want to limit the user so much.

Is there a way to simply have a popup come up warning that neither radio button was ticked? Perhaps something linked to the form - i.e., maybe "after update"?? I only learned about attaching code to before and after update on controls a couple of days ago, so not sure if this would be best approach.

Just something to let the user know that nothing has been ticked in the option group as that controls in which of 2 reports the data will show up in so any record not ticked might mean a registrant being left out, which would be rather disastrous <g>.

View 1 Replies View Related

Queries :: Only Identical Data Listed From Tables And Not All Data

Sep 7, 2013

Attached you will find an example with the problem.

The query is only searching identical data between both tables.

I want it to show results from all users, with all the devices each user has.

What am I doing wrong with the query?

View 4 Replies View Related

Populating A Subform Item To Another Subform Item.

Dec 21, 2006

Hey all.

I'm trying to get a combo box to populate the box next to it.

Basically pick a project number in the 1st box and have the project name show up in the second box.

I have it working, but the problem is that when it puts in the name of the project, it fills the whole column with that name, and not just the one box.

Here is what it's doing:
http://img156.imageshack.us/img156/2659/dbhm4.jpg

Here is the code im using.

Private Sub ProjectNumber_AfterUpdate()
On Error Resume Next

Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String


ProjectNumber.SetFocus
If ProjectNumber.Value > 0 Then
strSQL = "SELECT * FROM ProjectList WHERE ID = " & ProjectNumber.Value

Set db = CurrentDb
Set rs = db.OpenRecordset(strSQL)
If Not rs.BOF Then
Me.ProjectName = rs("ProjectName")
End If
rs.Close
Set rs = Nothing
db.Close
Set db = Nothing
End If

End Sub

Let me know what I can do.

Thanks!!

View 5 Replies View Related

New Item In The Field

Feb 22, 2005

Hi

I have a field that contains some kinds of the student status, such as "Current", "Alumni" and "Expire". The table has already got a lot of records. How can I make a new item available to the field, for example, "Other", without entering a new status?

Like, "Student A" is "Current" but he is now "Other" status. When the user see his record, he/she needs to change the student status from "Current" to "Other". I don't want the user to enter "Other" manually. I want it to be available from a comb box at the first place. How can I add a new item into a field without entering a new student record?

Sorry, I am unsure that I explain enough ..

Thank you.
Gaufres

View 3 Replies View Related

Item Numbers

Feb 2, 2005

OK heres the deal:
I have an asset inventory database that i've made where item numbers 1000-1999 is one category 2000-2999 is one category, 3000-3999 is one category etc.

I've made a drop down menu with the choices, 1000, 2000, 3000, etc.

What I want to be able to do is, I want the computer to generate the item number from that drop down menu's selected choice. For example if the category 1000 is chosen i want the computer to be able to generate the next possible item number (without duplicating any item numbers).


Is this possible?
Thanks much for any help :)

View 4 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved