Search results

Hello, I am tiring to write a (more or less) all purpose validation code, what I have so far works except for one thing, if there are multiple controls needing validation and you execute a command with out entering data the focus will move to the next control failing validation and so forth...

This seems vary clever to me, thanks giovaanni

Also have used this which I have retro fitted to various tasks, hope I'm being helpful here Dim CBx As ComboBox, DL As String Set CBx = Me![ComboboxName] DL = vbNewLine & vbNewLine If CBx.ListIndex = -1 Then 'No selection made!! MsgBox "'ComboboxName' is a required...

I have used this to good effect, similar to boblarson If MsgBox("stuff.....................................................................", _ vbQuestion + vbOKCancel, _ "Title stuff! . . .") = vbCancel Then ....

lagbolt,thanks again for responding, your code works well and gives me lots of food for thought. Tim

Wow, that was why more then I was hoping for, I am going to have to study it (I have only been at this for about 5 months, indeed I wrote my first function 2 days ago Function ClearAll(c As String, f As Form) Dim ctl As Control For Each ctl In f.Controls Select Case ctl.ControlType...

Hello, I have a parsing function which parse's with respect to a comma. If I go in to the module and change where the comma is declared and change it to a . then it will parse w.r.t a period similarly for a space or tab. So know I have three modules to parse three different ways. This is for a...

gemma-the-husky, boblarson, thank you, that was most helpful

gemma-the-husky, thanks for responding, I put "" around the c, and tried Me did not change the need for the: Call (I left them in the code, thanks for catching that), also tried if isnull(ctl.controlsource), recived error, then changed to If ctl.ControlSource is Null, which access seemed to...

I cobbled together my first function two days ago(with help from the form) Function ClearAll(c As String, f As Form) Dim ctl As Control For Each ctl In f.Controls Select Case ctl.ControlType Case acTextBox, acComboBox, acListBox, acCheckBox If ctl.ControlSource = "" And ctl.Tag <> c Then...

pbadly, SOS, Thank you both, is know working fine.

Just tried Function ClearAll(c As String, f As Form) or Function ClearAll(c As String, f As String) You would then use them (untested): f.Controls or Forms(f).Controls Coud not get any combination to work, would this part need restating Screen.ActiveForm ?, thanks

I will try these, also Screen.ActiveForm did work, thanks for responding

pbaldy, would you code the name as a varient?, not sure what it means to pass the form name, I will try the above, thanks for responding

Hello, I am tring to code my first generalized function, I have(which works as a function on a form) Function ClearAll(c As String) Dim ctl As Control For Each ctl In Me.Controls Select Case ctl.ControlType Case acTextBox, acComboBox, acListBox, acCheckBox If ctl.ControlSource = "" And ctl.Tag...

Maybe one of these will help Microsoft Access tips: Search criteria Access: Create a form where you can search any text field in a table in Access 2003/XP/2000/97 Forms: Adding a Search form to a database Search Form Example - Access World Forums

Written by MajP, Works perfectly There are probably a lot of versions. In access there are a lot of instance of a blank field (null value). This handles those cases. CODE Public Function getMax(ParamArray vals() As Variant) As Variant Dim myVal As Variant Dim maxVal As Variant For...

Thanks for replying will check it out

Hello, I am making a parts order form and I need to get the max value from three fields MSRP MarkUp HcpcPricing On MS web site they have a verbose solution, Would love to have a more succinct one if anyone has it . Thanks

Missingling, SOS. Missingling was on target, it is a coded function from a search form that builds a dynamic SQL statement and shows the results in a subform(The Access Web (http://home.att.net/~dashish)). I am building one of my own and thought I could use this function, if I understand it...