I have some forms that also includes sub forms.
I would like a function in a module that I could call when clicking a button on the forms to ask the user if he wants to save changes or not.
I am using the following code, but it does not work.
Can anybody help?
Public Function...
Thanks PHV thats extremly helpful and looks like it will do the job I want. The problem then comes when trying to list all the tools to carry out the master task (i.e. all child task tools!)
Looked everywhere and can not seem to find the answer, although I thinks its quite basic.
I am wanting to build a car maintenance type database that will help a beginner to do the tasks.
There are many tasks, but each task may and usually does involve other tasks.
For example: the task(1) to...
Thanks TheAceMan1.
Thhats what I have done to get round this problem.
Lucily there is only four controls to hide.
I can imagine that it would become pretty unwieldy if there were alot of controls to hide, I dont know if a procedure would be worth exploring where the OnMouseMove could reference a...
Yes its Visible property is set to visible so the MouseOver event sets the Visible property to true. Then when the focus is moved to another button THAT buttons lable will become visible and the label for the previous button will hide (visible = false).
My problem is that these buttons are on a...
I have a lable that appears on a form when the user moves over a button.
when the focus is moved off the button to another button the lostfocus event should turn the labels visibility off.
This works fine when testing the form, but when is is opened within the main form it does not hide.
Any...
I have two tables one of which is a holding table for the other.
I am using the code:
strsql= "DELETE * from Tablename
DoCmd.RunSQL
strsql = " INSERT INTO Tablename " _
& "SELECT * FROM HoldingTable"
DoCmd.RunSQL
The problem is the two tables are different once the Tablename populated from...
Great
I have got something of a start in what I am trying to achieve. Sometimes a few pointers in the right direction is all it takes to get your steam up and get up and running.
Thanks for you time and wisdom guys!!
Its a trickier problem than first appeared. it involves a large number of varied part numbers in many different formats, EG:
1. 6-2211334
2. 6-6675444-001
3. 6-6675444-002
4. 3456-67543
5. 3456-67543-01
6. 3456-67543-02
I think your trim statement would work if could first I check to see if the...
Thats great, but there is a problem with my logic:
some of the numbers have no modifier:
6-555432
in which case I want to keep those but using the expression you gave its obviously trimming where it shouldnt.
Any ideas?
If I have a table of part numbers that have been modified such as:
2-1234-001
2-1234-002
2-1234-003
3-444445-009
3-444445-010
How do I turn that into a table that shows:
Part Qty
2-1234 3
3-444445 2
I think its a right trim sort of problem.
Right(PartNo,Len(PartNo - (Number of digits...
That seems to do the business! many thanks for that.
I have never had to use this function before, you liva and learn!
One small observation though. While the progress bar is running the DoEvents function causes the buttons to flicker!
A minor annoyance, is there a solution to this?
I have a database that runs a long procedure displaying a progress bar whilst it is doing so.
The problem is that I can not use the computer for anything while this is happening.
Is there any code that can be added to release me to use the operating system fo other things While this is...
I have a couple of spreadsheets with autofilters in various guises (checkboxes, radio buttons, drop down list etc).
most of these when apllied show "X of X Records" in the status bar.
The one I am working on now only shows "Filter Mode" in the status bar.
How can I get the number of filtered...
SkipVought
Something you said about checking all states promted a rethink of the logic.
It now works as it should although somewhat slow on some of the filters.
I am not filtering on any values but actually the opposite, filtering where the cell is null or empty. Like manually selecting...
OK Code now:
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
Range("K2").Select
Selection.AutoFilter Field:=11, Criteria1:="<>"
Else
Selection.AutoFilter Field:=11
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
Range("J2").Select...
SkipVought
Firstly thanks for the reply.
I must be missing something, so excuse my ignorance.
I have calculations set to auto.
"Just remove the criteria from the unchecked filter"??
Each of the columns have values in and some have none, all the filter is doing is filtering out rows with no...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.