Search results

you could use a select case Dim PointNo as long Dim Grade as String PointNo=the name of the text box holding sum([Points]) select case PointNo Case 0 To 9 Grade="U" case 10 to 18 Grade="E" case 19 to 27 Grade="D"...

if your using access2k or more you could use conditionally formatting to acheive your desired result

if you are using access 2k or more you can also use conditional formatting, by selecting conditional formatting from the access toolbar

make sure the sub is public eg. public sub Dothis not private sub DoThis then call the sub by forms![formname].DoThis

have you tried creating the query using the find unmatched query wizard

it sounds like your references open a code module select tools, references make sure there is a reference to DAO checked if there is move it up the list as high as it will go if there isnt,find the reference in the list and check it and move it up the list

i have a form that only lets the user enter the next field if all conditions that i have set are true i dont know if there is a better way but this is what i do declare a form module variable dim GoBack as boolean dim MyResponse as string __________________________ sub CheckNumber Goback=false...

you have to open the linked table in the database it resides in and in design view add your new field. or you can do it with code if you have not got access to the table

base your report on a query,and set some critera on a field that identifies a unique value for the record you want to print

S Forms! [generic] . Recalc , get rid of the s Forms! [generic] . Recalc also if the application is such that you can access any code module you should compile and save it,as this may also highlight any other syntax problems you may have

you could use conditionally formatting for that field if it appears on your form.you can set up to 3 different formats depending on the value of the field

on error goto HandleErr: With iMsg Set .Configuration = iConf .To = "mmajewski@alliancebankna.com" 'ToDo: Enter a valid email address. .From = "AssetTracking@AllianceBankna.com" 'ToDo: Enter a valid email address. .Subject = "032003Database Accessed" .HTMLBody = "AssetTracking032003 was...

as is typical in access there is always more than 1 way, dateadd("y",30,[nameofdatefield1]) will also give you the correct date

Mike put the check box on the main form,so if the user checks the box then the pop up form wont even need to open

=dateadd("y",30,[nameofdatefield1])

in design view of your form click on the icon with green red and yellow dots around a square that will take you into the forms code module see if you can find 2 procedures with the same name,i.e print_orders_click if you have 2 the same then thats the problem you will need to determine which...

you could use select case in the after update event for each combo box select case combobox2 case x select case combobox4 case a msgbox"bad choice"...

one way would be on the after update of your field if me![checkboxname]=true then ' do nothing else docmd.open your form end if

you must have 2 event procedures named print_orders_click. in your code module

if currentUnit is a string try groupSQL = "SELECT tb_Main.[Group Heading], tb_Main.Unit FROM tb_Main WHERE (tb_Main.[Group Heading]) = " & """" & currentUnit & """"