Forms :: Add Additional Filter To Unbound Form - Checkbox?

May 27, 2015

I need to add an additional filter to my unbound form and can't seem to get the syntax right -

I have a text field in my form "[B Style]" that has either a "Y" or "N"

I want to add a checkbox on my main form where, if checkbox=True then [B Style]="Y"

Private Sub ckBStyle_Click()
Dim stFilter As String
Dim stDocName As String
stDocName = "Modify_OpenItems"
If Me.ckBStyle.Value = True Then
DoCmd.OpenForm stDocName, , , ("[B Style]" = "Y")
Else: DoCmd.OpenForm stDocName
End If
End Sub

stDocName is opening but is completely blank.

Incorrect syntax?

View Replies


ADVERTISEMENT

Forms :: Filter Form Using Checkbox And Combo

Aug 21, 2013

I have a reservation form and I want to tick a checkbox that will filter the form based on what is in the "Reservation Status" combo box.When the checkbox is ticked, the code would remove all records that have "Complete" as a status in the "Reservation Status" combo box. The non-working code that I currently have is:

Code:
Private Sub chkHideComplete_AfterUpdate()
On Error Resume Next
If Me.chkHideComplete = True Then
Me.filter = "[ReservationStatus] = 1"
Me.FilterOn = True

[code]....

View 7 Replies View Related

Forms :: DLookup For Unbound CheckBox

Jun 29, 2014

On my Login form I am trying to get the status of a user. Form and checkbox are unbound.

tblUserSecurity_Sec
userID is the UserName.
Field (Active) Data Type is Number, Field Size is Integer

CheckBox is (chkactive)

If DLookup("[Active]", "tblUserSecurity_Sec") = -1 And [userID] = (Me.txtUserID) Then
Me.chkactive = -1
End If

View 11 Replies View Related

Forms :: Update Table With Unbound Checkbox

Oct 17, 2014

How do you update table with unbound checkbox? I'd like to add basic yes/no, true/false on update. Currently I'm using a workaround like this

Code:
If Me.chkInkt = True Then
status = "true"
Else
status = "false"
End If

Which is ok if there's one of these, but sometimes I have more...

View 3 Replies View Related

Forms :: Checkbox / List Box And Unbound Keyword Search

Aug 7, 2013

I'm relatively new to Access 2010. I have an excel spreadsheet that I've converted into an access table for the purposes of creating a user friendly form for the end user to search for relevant criteria to retrieve a list of records that fit the requests. There are two main search functions: unbound keyword search (90+ keywords), and either a series of checkboxes or one list box that lists specific countries/regions matched in a column (columns, as I will get to shortly). The region selection is bound by a selection of 15 countries.

The key is each record can correspond to more than one country. This, one record can have "Belgium, Germany, brazil" and the next record can just have "brazil". Thus if someone selects brazil, the query must retrieve the Belgium Germany brazil record in addition to the record that covers just brazil. I've tried to do this with a concatenated column that list all countries and a text box search, I've tried to do this with individual checkbox columns for each country with checkboxes in the search form...and I can't get it to work. I don't fully understand the criteria to set for checkboxes or list boxes. What would be the best way to build this form, an how?

View 2 Replies View Related

Forms :: Filter Text And Checkbox?

May 24, 2013

I'm having a hard time with this (what I thought) was a simple filter. I have an unbound checkbox (chkFlag) and an unbound text box (txtfilter). The filter was working fine till I decided to also try to filter on the checkbox.

I'm trying to filter records that either have either a check in the [Flag] field or have some part of the text in various other fields. The problem is I can get the records to filter if the checkbox is checked or on text in the various fields, but not both. I've tried using AND and OR, but it's not working.

Code:
Me.RecordSource = "SELECT * from tblContacts; "
'-------------------
strWhere = ""

[Code]....

View 4 Replies View Related

Checkbox Filter On Continuous Form

May 27, 2015

On my continuous form, I have a field that is a checkbox. I would like to place an unbound checkbox/radiobutton in the form header so that when the it is checked, it will display only records that are checked, and when it is unchecked, it will only display records that are unchecked.

View 2 Replies View Related

Modules & VBA :: Filter A Report Via Unbound Form

Apr 22, 2014

When I have a value in "WorkCenter" everything works great and graph looks fine. When I leave blank in order to see all records, I get a blank graph.

Here's the code:

Private Sub Open_Downtime_Graph_Click()
Dim strCriteria As String
If IsNull(Me.WorkCenter) Then
strCriteria = "[WorkCenter] Like '*'"

[Code] .....

View 7 Replies View Related

Modules & VBA :: Filter Records - Adding Unbound Date Listbox To Filter String

Feb 10, 2014

I'm trying to hash two scripts I've found into 1 functioning filter, however I'm still relatively new to vba and can't figure out how to get this working.

I'm trying to use Allen Browne's Search Criteria:

with another snippete of code I found here:

Code:
'Purpose: This module illustrates how to create a search form, _
where the user can enter as many or few criteria as they wish, _
and results are shown one per line.

[Code]....

It's the date part I'm having trouble with, the rest of the search criteria work fine without the date, but I can't get it working when I try to modify and merge the date sections of each code.

Also I'm using a listbox for the "Yesterday";"Last 4 days";"Last 9 days" and not a combo box.

View 2 Replies View Related

Unbound Checkbox To Edit Selected Records

Dec 8, 2006

Hi i have a shared database and have a form with a string of records. Each record has its own unbound checkbox and I want to make it so you can select multiple records, then be able to hit a button on the top of the form to edit certain fields of the records selected. Please keep in mind that this is shared by 10 users, therefore a linked yes/no field would cause problems between the users.

View 2 Replies View Related

Checkbox-filter

Oct 29, 2005

Hello,

I ve got a big problem:) What i am trying to do is CRM , this crm has some informations about the companys. ----->

I have form where are all the informations about companys entered by users of CRM. One of the informations is size of the company. What i did is that i have put three check boxes ( small , middle, large ) and bound them with the main table company ( companyID, companysmall ( YES/NO ), companymiddle(YES/NO), companylarge ( YES/NO ), companyfax, ... ).
When you mark the check box ther is an yes in table for a size of company and no for the other two options.

What i would like to do is to create another form where i could filter companys by ther size. But the tricky part is, that i would like to filter with check box so that i can filtr for example small and large companys at same time.

How can i do this - can you help me - mabe some examples.

Thank you,

Luka

View 1 Replies View Related

Checkbox To Filter Table

Mar 17, 2005

Hello!

i have a small for you probably problem! I tried to find something here but only bits and pieces could help only a little!

well here is my problem!

i have a form with a subform! the subform is a datasheet by a table!

In my main form I have a check box! what I want to achieve is to filter my subform by current date when i mark the check box and remove the filter when i uncheck it!

i could have it done by query or something but it was a last minute idea! thus i would have to change a lot of stuff doing it that way! the table is already filtered by a combo box record selector!

-----------------------
i have used a code but it does not work probably because there is no filter to activate!

Private Sub Today_Filt_Click()

If CheckBox = True Then Me.FilterOn = True
If CheckBox = False Then Me.FilterOn = False

End Sub

So could i put the filter parameter on the vba part???


any sudjestions????

Thank you :)

View 5 Replies View Related

Checkbox Filter Query

May 31, 2005

Hey i have this really annoying bug, theres several tick boxes that im using to filter records but if i tick more than one i get a syntax query error? any idea what this could be? i have had several people look at the code and tell me theres nothing wrong.

Option Compare Database
Option Explicit
Const strSQL = "SELECT * FROM issues"

Private Sub filter_Click()
'Variable to hold filtered SQL string
Dim strFilterSQL As String

If check_os98 = True Or check_osnt = True Or check_os2k = True Or check_osnt = True Or check_osxp = True Or check_fxpda = True Or check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strSQL & " WHERE "
End If

If (check_os98 = True) Then
strFilterSQL = strFilterSQL & "os98 = True"
If check_osnt = True Or check_os2k = True Or check_osnt = True Or check_osxp = True Or check_fxpda = True Or check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_osnt = True) Then
strFilterSQL = strFilterSQL & "osnt = True"
If check_os2k = True Or check_osxp = True Or check_fxpda = True Or check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_os2k = True) Then
strFilterSQL = strFilterSQL & "os2k = True"
If check_osxp = True Or check_fxpda = True Or check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_osxp = True) Then
strFilterSQL = strFilterSQL & "osxp = True"
If check_fxpda = True Or check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_fxpda = True) Then
strFilterSQL = strFilterSQL & "fxpda = True"
If check_fxpc = True Or check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_fxpc = True) Then
strFilterSQL = strFilterSQL & "fxpc = True"
If check_fxas = True Or check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_fxas = True) Then
strFilterSQL = strFilterSQL & "fxas = True"
If check_fxrs = True Then
strFilterSQL = strFilterSQL & " AND "
End If
ElseIf (check_fxrs = True) Then
strFilterSQL = strFilterSQL & "fxrs = True"
End If

strFilterSQL = strFilterSQL & ";"
Me.RecordSource = strFilterSQL
Me.Requery
End Sub

View 14 Replies View Related

Forms :: Filter Button On Form As Filter

Aug 1, 2013

I have placed a filter button on a form as a filter and written the following on-click event procedure:

DoCmd.SetWarnings False
DoCmd.RunCommand acCmdApplyFilterSort
Me.Filter = "ACCOUNT_DO_NOT_EMAIL = 'HS'"
Me.FilterOn = True

When I click the filter button I get a blank message box titled 'Microsoft Access" and an OK button, when closed the filter works perfectly.I have checked this procedure in other forms and it works without showing the blank message box.The only difference with this form is that its control source is a union query.

View 10 Replies View Related

Queries :: How To Filter Checkbox Field

Jul 29, 2013

I have a query which is run from a form via a command button. On this form i have a couple control sources (not sure if this is the correct term, but i have text boxes and drop down lists which the query uses in its criteria).

Everything works fine except i can't figure out how to filter my checkbox field (aka MyDeliv). I'd like to have a drop down box with 3 options: "yes", "no", and "ignore". i would like "yes" to return only records with the MyDeliv box checked, "no" to return only records with the MyDeliv box unchecked, and "ignore" to return records regardless of the MyDeliv checkbox.

View 3 Replies View Related

Forms :: New Form Using Checkbox

Oct 10, 2013

I downloaded Checkbox open form.zip from this site. It uses option group for the checkboxes

It runs perfectly when I double click in access but i would like to use this in vba when called from another form. When i put the code in and try to run it I get the error:

Compile Error
Method or data member not found

It is referring to .Frame8

Here is the code I used:

DoCmd.OpenForm "Mainform", acNormal

Select Case Me.Frame8
Case 1
Open Form 1
Case 2
Open Form 2
Case 3
Open Form 3
Case Else
MsgBox "You did not make a selection"
End Select

View 5 Replies View Related

Forms :: Making Textbox Visible On A Form If Checkbox Is Checked On Same Form

Aug 30, 2013

I am having a problem with making a textbox visible on a form if a checkbox is checked on the same form. I have done research on this site and have written the code below, but I am getting a Syntax error, see yellow highlight.

- My checkbox is named: Case is a Readmission from WRCA IP to WRCA IP
- My textbox is named: Date of Current IP Admission (I have defaulted this textbox to not visible).

Here's the code I have written:

Private Sub Case_is_a_Readmission_from_WRCA_IP_to_WRCA_IP_Clic k()
If Case is a Readmission from WRCA IP to WRCA IP =true then
Date of Current IP Admission.visible=true
Else
Date of Current IP Admission.visible=false

[Code] .....

View 14 Replies View Related

Forms :: Open Another Form If Checkbox Is Checked?

Apr 7, 2013

I am trying to write an IF statement as a macro on the OnClick property of a checkbox and can't get it to work. Basically, if the checkbox is checked (for Yes) I want it to open another form. (The checkbox is a field on a subform on a form).

I haven't even gotten this far yet, but I would also like the IF statement to include an AND somehow....in other words I want the IF statement to basically say if the box is checked for yes AND the offer status field ="Accepted", then open another form. If either is False, then I don't want it to do anything except display a message box saying they can't initiate a contract is both conditions aren't true.

View 2 Replies View Related

Forms :: Remembering If Checkbox Has Been Clicked In A Form

Jul 3, 2013

Here's the scenario:

I have a table of Clients, each of which can have zero or more Contacts. Clicking the Contacts button on the Client form opens a pop-up form that displays the Client's Contacts.

Each Client can have a default Contact, indicated by a DefaultContact checkbox on the Contact form. If the user checks this checkbox, I want to run a piece of code that checks whether any of this Client's Contacts are already set as default and, if so, warns the user before proceeding. If the user goes ahead, 'default' status is assigned to the current Contact & removed from the other.

It seems to me that the obvious place to do this is on the Contact form's BeforeUpdate event, when the record is being saved. However, it's only necessary to do this when the DefaultContact checkbox has been clicked. But there's no 'Dirty' flag for checkboxes & the only way I can think of is to set a global (within the scope of the form) variable and get the BeforeUpdate code to check it before running my 'Default Contact' code above.

View 6 Replies View Related

Tables :: Syntax Error When Transferring Records With Checkbox Filter?

Jan 8, 2014

I'm trying to transfer records from a table in one subform to another subform (on same form) using a checkbox as a filter:

Private Sub TransferAndReview_Click()
Dim db As dao.Database
Dim strSQL As String
strSQL = "INSERT INTO Forms![Extra Work Report Checksheet]![Equipment Input Subform1].Form[(QuantityUsed[, HoursUsed])] VALUES (QuantityUsed[, HoursUsed]) FROM Forms![Extra Work Report Checksheet]![Equipment Checksheet Table Subform] WHERE [Extra Work Report Checksheet]![Equipment Input Subform1].Form[EquipmentUsed]=True;"
Set db = CurrentDb
db.Execute strSQL, dbFailOnError
End Sub

The Main form is: [Extra Work Report Checksheet]

Subforms are: [Equipment Input Subform1] & [Equipment Checksheet Table Subform]

Checkbox field is: [EquipmentUsed]

I keep getting the error "Syntax error in INSERT INTO statement" which points to 'db.Execute strSQL, dbFailOnError' and I don't understand why. Neither of the fields [QuanityUsed] or [HoursUsed] are lookup fields, etc.

View 7 Replies View Related

Forms :: Adding Additional Records On Condition

Jun 29, 2013

What I am trying to create is a Despatch database for our warehouse.

Records in table:
Date ()
Customer
Invoice #
Qty of parcels sent
Courier used
consignment number

In most cases we will send one invoice per consignment number (database works fine for this) But on occasion we may send multiple invoices. What I want to be able to do is have a list box to select the number of invoices, this will make available additional fields for Invoice # and Qty of parcels sent. The idea is to get away from keying in the other records for each invoice going to the same place.

View 3 Replies View Related

Forms :: Enable / Disable Checkbox On Continuous Form

Apr 5, 2015

I am asked to create a checklist for a number of tasks to be executed in a particular shift. However in some tasks can be skipped. There are three shifts per day.

To accomplish this i have created a continious form with a number of checkboxes per task which represent the days of the week. The tasks itself are stored in a seperate table with a checkbox per shift (task settings). If the tasks must be performed in a particular shift, the checkbox is activated (= true).

Goal here is, if a task doesn't have to be executed in a shift the task should not be visible on the continious form. The recordsource of the continuous form is a query, which contains a join between the table with the task settings and the table with the tasks performed.

I have placed some code to perform the task in the form's current event

In the continuous form current event I have placed for every checkbox the following code:

Private Sub Form_Current()
If Me. PerformTaskShift.Value = True Then
Me.MaandagOchtend.Enabled = False
End If
End Sub

However when i execute the code and load the form, not only the checkbox in the row mentioned are set invisible, all the rows are. Is there any way to set only the checkboxes on the rows mentioned invisible, in stead of all rows?

View 1 Replies View Related

Forms :: Opening A Form / Text Box When Checkbox Is Ticked?

Aug 19, 2015

I'm a novice user of Access 2013.

I would like to be able to use a checkbox control to make either text boxes or forms appear when ticked, ultimately to stop a form being so untidy/to conserve space. I'd be using this on multiple occasions.

(If actioned, would it automatically shift the other controls in the form down to make space, or would it just overlap?

View 4 Replies View Related

Unbound Combo Box Filter On Planning Database

Oct 14, 2005

HI THERE. IM HAVING A FEW PROBLEMS TRYING SORT THIS PROBLEM OUT. I HAVE A DATABASE IM TRYING TO APPLY A FILTER ON THROUGH AN UNBOUND COMBO BOX. WHEN SELECTING THE DROP DOWN FILTER TO SORT THE RECORDS NOTHING HAPPENS. THE CODE IM USING IS
Private Sub Combo??_AfterUpdate ()
'Find the record that matches the the control
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[WARD_AREA] = '" & Me! [Combo??] & " ' "
If Not rs.EOF Then.Bookmark = rs.Bookmark
End Sub

Does anyone know why this filter is not sorting through the records. Any comments much appreciated!!

Attached is the database

View 1 Replies View Related

Reports :: Filter A Report With Unbound Text Box

Aug 29, 2013

I have a report [Report1] that gets its data from a query [Query1]. On [Report1] there is an unbound text box [EnterEndDate] that I want to use as a filter for the report criteria, and have it filter the report to show every report row with the value in the [EndDate] field greater than what the user entered in [EnterEndDate].

There is no need to save the value used in [EnterEndDate]. It will be entered after the report is run and changed on demand while the report is open for the user to see different date ranges.

View 2 Replies View Related

Multiple Filter With Unbound Text Boxes

May 21, 2015

The layout: I have form1 listed in continuous view. I have about 10 fields being listed. I have unbound text boxes for each field in the form header designated as a filter for each field.

Ideal world: Have each filter update records as you type. But I would also like for a "cascade" effect on the filters as well. Being that I can type in a few letters in FilterField1, and type in a few letters in FilterField2 and it would only display the records where the criteria is met for both filters.

What I'm not looking for: Only applying 1 filter at a time for 1 field. I have this setup now, but would like it to be more versatile allowing several fields to be filtered at once.

View 2 Replies View Related







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