Queries :: How To Tick Yes / No Button Faster

Aug 6, 2013

Im new in using MS Access. How i can "tick" the yes/no button faster. I have almost 3,000 boxes to tick and its making my wrist ache... Unlike in excel where i can just drag it to the last cell....

View Replies


ADVERTISEMENT

Load Code Faster

Apr 10, 2006

hi
i have a form with 12 checkbox and 1 combobox
i use the following code


Option Compare Database
Private Sub Form_Current()
If Me.Image1 = -1 Then
Me.Parent.Image1.Visible = True
Me.Image1_text.FontBold = True
Else
Me.Parent.Image1.Visible = False
Me.Image1_text.FontBold = False
End If

If Me.Image2 = -1 Then
Me.Parent.Image2.Visible = True
Me.Image2_text.FontBold = True
Else
Me.Parent.Image2.Visible = False
Me.Image2_text.FontBold = False
End If
If Me.Image3 = -1 Then
Me.Parent.Image3.Visible = True
Me.Image3_text.FontBold = True
Else
Me.Parent.Image3.Visible = False
Me.Image3_text.FontBold = False
End If
If Me.Image4 = -1 Then
Me.Parent.Image4.Visible = True
Me.Image4_text.FontBold = True
Else
Me.Parent.Image4.Visible = False
Me.Image4_text.FontBold = False
End If
If Me.Image5 = -1 Then
Me.Parent.Image5.Visible = True
Me.Image5_text.FontBold = True
Else
Me.Parent.Image5.Visible = False
Me.Image5_text.FontBold = False
End If

If Me.Image6 = -1 Then
Me.Parent.Image6.Visible = True
Me.Image6_text.FontBold = True
Else
Me.Parent.Image6.Visible = False
Me.Image6_text.FontBold = False
End If

If Me.Image7 = -1 Then
Me.Parent.Image7.Visible = True
Me.Image7_text.FontBold = True
Else
Me.Parent.Image7.Visible = False
Me.Image7_text.FontBold = False
End If

If Me.Image8 = -1 Then
Me.Parent.Image8.Visible = True
Me.Image8_text.FontBold = True
Else
Me.Parent.Image8.Visible = False
Me.Image8_text.FontBold = False
End If

If Me.Image9 = -1 Then
Me.Parent.Image9.Visible = True
Me.Image9_text.FontBold = True
Else
Me.Parent.Image9.Visible = False
Me.Image9_text.FontBold = False
End If

If Me.Image10 = -1 Then
Me.Parent.Image10.Visible = True
Me.Image10_text.FontBold = True
Else
Me.Parent.Image10.Visible = False
Me.Image10_text.FontBold = False
End If

If Me.Image11 = -1 Then
Me.Parent.Image11.Visible = True
Me.Image11_text.FontBold = True
Else
Me.Parent.Image11.Visible = False
Me.Image11_text.FontBold = False
End If

If Me.ComboBox1 = "No" Then
Me.Parent.ComboBox1.Visible = False
Me.ComboBox1_text.FontBold = False
Else
Me.Parent.ComboBox1.Visible = True
Me.ComboBox1_text.FontBold = True
End If

If Me.Image12 = -1 Then
Me.Parent.Image12.Visible = True
Me.Image12_text.FontBold = True
Else
Me.Parent.Image12.Visible = False
Me.Image12_text.FontBold = False
End If
End Sub
Private Sub Image1_AfterUpdate()
If Me.Image1 = -1 Then
Me.Parent.Image1.Visible = True
Me.Image1_text.FontBold = True
Else
Me.Parent.Image1.Visible = False
Me.Image1_text.FontBold = False
End If
End Sub
Private Sub Image2_AfterUpdate()
If Me.Image2 = -1 Then
Me.Parent.Image2.Visible = True
Me.Image2_text.FontBold = True
Else
Me.Parent.Image2.Visible = False
Me.Image2_text.FontBold = False
End If
End Sub
Private Sub Image3_AfterUpdate()
If Me.Image3 = -1 Then
Me.Parent.Image3.Visible = True
Me.Image3_text.FontBold = True
Else
Me.Parent.Image3.Visible = False
Me.Image3_text.FontBold = False
End If
End Sub
Private Sub Image4_AfterUpdate()
If Me.Image4 = -1 Then
Me.Parent.Image4.Visible = True
Me.Image4_text.FontBold = True
Else
Me.Parent.Image4.Visible = False
Me.Image4_text.FontBold = False
End If
End Sub
Private Sub Image5_AfterUpdate()
If Me.Image5 = -1 Then
Me.Parent.Image5.Visible = True
Me.Image5_text.FontBold = True
Else
Me.Parent.Image5.Visible = False
Me.Image5_text.FontBold = False
End If
End Sub
Private Sub Image12_AfterUpdate()
If Me.Image12 = -1 Then
Me.Parent.Image12.Visible = True
Me.Image12_text.FontBold = True
Else
Me.Parent.Image12.Visible = False
Me.Image12_text.FontBold = False
End If
End Sub
Private Sub Image6_AfterUpdate()
If Me.Image6 = -1 Then
Me.Parent.Image6.Visible = True
Me.Image6_text.FontBold = True
Else
Me.Parent.Image6.Visible = False
Me.Image6_text.FontBold = False
End If
End Sub
Private Sub Image7_AfterUpdate()
If Me.Image7 = -1 Then
Me.Parent.Image7.Visible = True
Me.Image7_text.FontBold = True
Else
Me.Parent.Image7.Visible = False
Me.Image7_text.FontBold = False
End If
End Sub
Private Sub ComboBox1_AfterUpdate()
If Me.ComboBox1 = "No" Then
Me.Parent.ComboBox1.Visible = False
Me.ComboBox1_text.FontBold = False
Else
Me.Parent.ComboBox1.Visible = True
Me.ComboBox1_text.FontBold = True
End If
End Sub
Private Sub Image8_AfterUpdate()
If Me.Image8 = -1 Then
Me.Parent.Image8.Visible = True
Me.Image8_text.FontBold = True
Else
Me.Parent.Image8.Visible = False
Me.Image8_text.FontBold = False
End If
End Sub
Private Sub Image9_AfterUpdate()
If Me.Image9 = -1 Then
Me.Parent.Image9.Visible = True
Me.Image9_text.FontBold = True
Else
Me.Parent.Image9.Visible = False
Me.Image9_text.FontBold = False
End If
End Sub
Private Sub Image10_AfterUpdate()
If Me.Image10 = -1 Then
Me.Parent.Image10.Visible = True
Me.Image10_text.FontBold = True
Else
Me.Parent.Image10.Visible = False
Me.Image10_text.FontBold = False
End If
End Sub
Private Sub Image11_AfterUpdate()
If Me.Image11 = -1 Then
Me.Parent.Image11.Visible = True
Me.Image11_text.FontBold = True
Else
Me.Parent.Image11.Visible = False
Me.Image11_text.FontBold = False
End If
End Sub



how to optimize my code to run faster???

the images are 1 KB size , 16x16 pixels and .bmp
All of them are insert inside db.

i think images are too small to slow down my code.
Can i write the code in a different way?

View 1 Replies View Related

How To Make A Query Run Faster

May 8, 2007

Hi,

I am opening a query in Access which has two linked sql tables but it takes to long to open. Can I choose a method (ADO) opening that query? If not, is there a way to speed up the process?

thanks

View 1 Replies View Related

How To Make Query Run Faster

Mar 26, 2008

See attached image. I am looking for ways to make my query run faster. When I run this query for small groups which will return less than 100 records, the query takes about 30 seconds. However I have some groups that have over 1000 records and that will take 3-5 minutes to run. Actually sometimes the query even bombs after 30 seconds on the large groups.

This query hits against a linked SQL database. Three of the fields gets the criteria from a form combo box. The thing that makes this query take so long is the Count. It counts the number of times the Signature Type "duedte" has been changed.

I am looking for any suggestions for how to speed this up. I want real time results so I was not sure if copying the data locally each time then running the queries would help any in the overall time.

I appreciate any suggestions.

Jim

View 5 Replies View Related

Opening MS Access Faster

Mar 10, 2008

I revised my DB thinking that one big form divided by Page Tabs would speed things up. Wrong. It slowed everything down to a crawl. I found the more I broke up Forms into sub-forms the faster things went.

Incidentally this may be the answer to the problem I posted about Permission Lockups. (See Access 2000 Permission lockup posted on 2/20/08). I noticed that the big form version requested to save forms that I think I had not even opened. So when I encountered the problem on installing the DB on my network, I just did two or three saves just for luck. This seemed to do the trick. This suggested that my Permission Lockup may have been due to not all Forms had been saved on closing.

The evidence is circumstantial but I have had no trouble since.

View 1 Replies View Related

Changing Recordsource Then Go Back To Original - Query Is Faster

Oct 11, 2006

Hi
I have some drop downs on my form, which has some code that decides which recordsource to use.
When I first select an option from the drop down, the query takes 10 seconds to load data.
I then select another option, which runs a different query, which takes x seconds.
If I then select the original option from the dropdown, the data loads onto the form in less than a second.

Why is there a delay the first time round and not the next? Has Access saved some kind of query plan? If so, why doesn't it save it permanently?

View 1 Replies View Related

Faster Movement Of Report Object With Pictures When Scrolling

Jul 9, 2013

My report has in each row at least 1 picture which is about 1.5" square when open; however, when trying to scroll up or down the pictures dazzles on and off while the pausing the scroll which moves slowly. If the pictures are removed the scrolling movement is normal.

How can this report scrolling be made more efficient?

View 3 Replies View Related

Tick Box Problem

Feb 13, 2006

Hi.
I've set a up a tick box to choose the option to have an extension on a booking. If it is ticked, then i want it to add an extra £5 to the final cost, BUT, it can ONLY be ticked, if the Day of week is a Friday or a Saturday, AND if the time period is an evening.

Is there a way of making it, so that if the day of week is equal to friday or saturday, AND time period is equal to evening, the tick box becomes active, or visable, and if it is any other time period and day of week, it cannot?

Thanks

View 5 Replies View Related

Tick Box Manipulation

Mar 17, 2008

This is probably very simple but still beyond me.

I have a table that stores text in a number of different languages. Each entry has a unique ID number. Each language version of the same text shares the ID number.
I have a column of tick boxes that show where this text is used.
ie
1.0 English_text_record_1 tickcol1=y tickcol2=n tickcol3=y
1.0 French_text_record_1 tickcol1=y tickcol2=n tickcol3=y
1.0 Spanish_text_record_1 tickcol1=y tickcol2=n tickcol3=y
2.0 English_text_record_1 tickcol1=y tickcol2=y tickcol3=y
2.0 French_text_record_1 tickcol1=y tickcol2=y tickcol3=y
2.0 Spanish_text_record_1 tickcol1=y tickcol2=y tickcol3=y

I am trying to set the tick boxes so that, if I tick one in an ID range, all the rest tick on as well. ie if I tick record 1.0 English tick_col_2, then the French and spanish will be ticked as well.
Any suggestions will be greatly appreciated.

Andy

View 1 Replies View Related

Tick Box Code When Value = ###

Dec 6, 2006

hi,

what would the code be if i wanted a tick box called 'paid?' to be true once a field on my form called 'amount outstanding' = £0?

thanks

View 10 Replies View Related

Tick Boxes

Apr 23, 2008

I currently have a form which contains a column of tick boxes, when a box is ticked the database automatically enters the date and the name of the person logged on. It all works fine except that if i tick say row 1 then the date/name appears as it should, but at the same time random (or so it seems) boxes have ticks appear, although there is no data added to the names/date fields, just the ticks appearing .
Not sure why !!!

View 13 Replies View Related

Recordset Filter With Tick Box Yes/no

Nov 15, 2005

Hi There

Im Trying To Find A Solution To My Problem About Searching Records Through A Recordset Filter. I Have Performed The Follwing Code To Filter My Records From The Combo Box However In My Database I Have Several Yes/no Fields That I Would Like To Filter Out As Apart Of A Recordset.

Code is

Dim sql As String
sql = "SELECT * FROM [qry Landuse Survey 2005] WHERE [STREET] = '" & Me![Combo255] & "'"
Me.RecordSource = sql


Does Anyone Know How I can use the same principle for Yes/no Field Types?


Comments Much Appreciated!

View 4 Replies View Related

Searching Yes/No Tick Boxes

Jun 21, 2006

Hi everyone

Is it possible to create a query that prompts the user to enter the search criteria (i can do that bit) to search whether a yes/no tick box has been ticked or not. What does the user enter into the criteria box to find this?? I have tried entering null, not null, true, false, yes and no but none of them seem to work. Is this because the criteria you enter is taken as a text string and therefore will not find a tick/no tick??

James
Youngest Data Manager in England ;)

View 1 Replies View Related

Tick Box Doesn't Appear Enabled.

Jun 23, 2005

Have a number of tick boxes on different forms. When the form is opened the tick box appears to be greyed out however it is enabled. Is there any way that these tick boxes can appear enabled???

View 2 Replies View Related

Can You Have Coloured Tick-boxes?

Nov 8, 2006

Hi,

Does anyone know if it's possible to colour a tick-box: e.g. the border, the background or the font-colour? I'm trying to put a red tick-box on my form (to differentiate one vital one from several others), but I can't seem to find a way. I have changed the border to red (255) and tried various options like flat, sunken etc. but it only seems to work with shadowed - and to be honest that looks terrible.

I've fudged it a bit by putting a coloured box on the form and overlaying the tick-box, but I would have thought there was a better way.

Pat.

View 3 Replies View Related

Please Help...tick Checkbox Before Proceeding To Next Record

Jul 5, 2007

Apologies as I've already asked this question in the forms section of the forum but the responses were a bit on the light side...I'm now getting desperate having spent much of the day trying other sources such as google (even the advanced searches as advised in a different thread)...somebody help please...

I'm just want to make sure that my IT illerate users have to tick a checkbox before they can view the next record with a message box appearing to ask them to tick it if they haven't.

I've seen a few threads on much more complex scenarios but have failed to plagiarise anything, it must be pretty basic to do right?!?

View 12 Replies View Related

Code To Tick Box On All Records In Table

Jan 29, 2008

I need the code that will tick the box in all records in a table

Thanks,

Richard

View 1 Replies View Related

Tick Checkbox If Database Is True

Dec 3, 2006

Hi,
in my web page, i would like to user to see a ticked checkbox should the database = True however, i cannot seems to be getting it. Would anybody be able to help me out?

strSQL = "SELECT DeptHeadA FROM Employee WHERE EmpId = '" & strEmpId & "'"
nRecDHA = GetRecordset(strSQL, arrDHA)

if arrDHA(0,i) = True then
arrDHA(0,i) = "Checked"
else
arrDHA(0,i) = ""
end if

<tr>
<TD valign=top width="27%"><font size="2"><b>Department Head Alternate (1st) :</b></font></TD>
<td width="72%">
<input type="checkbox" name="DeptHeadA" value="<%=arrDHA(0,i)%>"></td>
</tr>

View 2 Replies View Related

Unchecking The Tick Boxes In The Table

Jul 29, 2005

Hi

was wondering if i could get some assistance to hopefully a simple query.

In one of my tables i have about 1000 records with the data type yes/no and the problem is I have reliased that I need to have as a default value a yes (or a tick in my form) but i dont want to go down each record filling in a tick. Is there any easier way to do this

You will have to bear with me I am pretty new to access.

I manage to set up a default value of yes but this will only work on new records entered, but the issue i have is I require it to be on my records which are already there.

Any help will be really appreciated.

Thanks

Ranj

View 1 Replies View Related

Dates And Tick Boxes In A Form

Jun 2, 2006

Hey,

I hope this is the right place to be posting this...

I've set up a database about unemployed people and it has a field called "Start Date of Employment", where a date is manually entered by the user.

Further down, there are two tick boxes - one called "13 weeks", and one called "26 weeks".

Now, what I'd like to happen, is that the database looks at the "Start Date of Employment", and then if 13 weeks have passed, it puts a tick in the 13 weeks box. Then when 26 weeks have passed, it puts a tick in that box also.

I'm assuming that this is possible, but I have no idea how.

Can anybody help?

Thanks

Dan

View 8 Replies View Related

Tick Box And Text Box Not Working Properly

Aug 7, 2006

I have a 'yes' check box and a 'no' check box. When the 'yes' check box is ticked, it enables a text box so I can enter a date and disables the 'no' box. Great, how it should work.

However, for some reason, whenever a date is entered into the text box when the 'yes' box is checked, every 'no' box afterwards is greyed/disabled out.

The thing is, it doesn't happen when no data is entered into the text box, when the 'yes' box is checked. So I can have the yes box checked, the no box will grey out as it should, and the text box will be enabled, as it should. But as soon as I enter a date, the above problem happens.

If that's not too confusion, can anyone help?

I've tried attached the database, but apparently it's too big, so i've posted the code underneath.

Cheers

Dan

EDIT: - i've just figured out that this problem is solved when I close the form and re-open it. But obviously I don't want to keep doing this every time I have to enter a date in a record.

Code:Private Sub chkSuccessful_AfterUpdate()If chkSuccessful = True ThentxtDateAppointed.Enabled = TrueEnd IfIf chkSuccessful = True ThenchkSuccessfulNo.Enabled = FalseEnd IfIf chkSuccessful = False ThenchkSuccessfulNo.Enabled = TruetxtDateAppointed = FalseEnd IfEnd SubPrivate Sub chkSuccessful_Enter()If chkSuccessful = True ThentxtDateAppointed.Enabled = TrueEnd IfIf chkSuccessful = True ThenchkSuccessfulNo.Enabled = FalseEnd IfIf chkSuccessful = False ThenchkSuccessfulNo.Enabled = TruetxtDateAppointed = FalseEnd IfEnd SubPrivate Sub chkSuccessfulNo_AfterUpdate()If chkSuccessfulNo = True ThentxtDateAppointed.Enabled = FalseEnd IfIf chkSuccessfulNo = True ThenchkSuccessful.Enabled = FalseEnd IfIf chkSuccessfulNo = False ThenchkSuccessful.Enabled = TrueEnd IfEnd SubPrivate Sub chkSuccessfulNo_Enter()If chkSuccessfulNo = True ThentxtDateAppointed.Enabled = FalseEnd IfIf chkSuccessfulNo = True ThenchkSuccessful.Enabled = FalseEnd IfIf chkSuccessfulNo = False ThenchkSuccessful.Enabled = TrueEnd IfEnd Sub

View 1 Replies View Related

Forms :: Clear Tick Box Value When Open?

Aug 18, 2014

Im doing an attendance in Access database , i have a Staff table and AttendanceMain table for keep all the staff attendance ...

I also created a query to append the data into AttendanceMain table ... the problem is , I always reuse the staff name , so i created a Staff form , but everytime i open the staff form the previous record still there , anyway to clear the "Tick Box" in staff table and without affecting the name ?(Name also is a record in row by row)

View 1 Replies View Related

Modules & VBA :: On Click Cmd Yes Tick All Records

Oct 29, 2013

I have a form called frmBillingExport. On that form i have a button called cmdExcel that when clicked exports all the records to excel.

On the form i have a sub-form called subfrmBillingExport and in that form there are lots of fields and one of them is a tick box called blnInvoiced. The subform is also in datasheet view.

Its also worth mentioning that the subform runs off a query that displays the values based on criteria provided on a previous form.

What i want to do is when you click cmdExcel I want a window to pop up to say "Are you sure you want to invoice all of these bookings?" with buttons for Yes and No. On the Yes click i want it to tick the blnInvoiced for all those records and then only export it so i assume take whatever code is suggested and place it before that export happens.

View 1 Replies View Related

Show Text Box If Tick Box Is Selected

Aug 5, 2011

I basically need a text box which is for date/time to disapear/appear when i tick or untick a little tick box.

My tick box is called AlarmResponse and my text box is called CallReceived...

View 14 Replies View Related

Forms :: Tick In Check Box On Master Form?

Dec 8, 2014

I have a form with a sub form... I want to know if the following is possible...

If I have a check box on Master Form and make it there is a tick in it, can I make a check box on the sub form do the same i.e.

Master form ticked = sub form record ticked and visa versa

View 5 Replies View Related

Forms :: Unselecting Tick Box When Combo Box Value Has Changed

Oct 28, 2014

I have a form with a combo list and a check box.

The combo list has values 1-4, the default is 1.

By default the checked box is ticked

I want that if a user changes the combo value from 1 to 2,3 or 4 then the check box changes from true to false.

View 2 Replies View Related







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