Search results

should go something like this, on the after update of the checkbox put if Me!NameOfCheckBox = -1 then Me!NameofControlToEnableDisable.Enabled = False Else Me!NameofControlToEnableDisable.Enabled = True Endif [This message has been edited by Geoff Codd (edited 04-03-2002).]

Sorry about that you could put <>0 in the validation rule field of the table this will only allow a value that is greater than 0 to be entered and returns an error message if you enter text [This message has been edited by Geoff Codd (edited 04-03-2002).]

on the after update event for CmbCharges put the following VBA If Me!CmbCharges = "Other" then Me!CmbOtherCharges.Enabled = True Else Me!CmbOtherCharges.Enables = False Endif

Check the help files for input masks, there you can specify what type of Characters you can enter into a field

Jack, You are a star. Thanks ever so much for all your help. Thanks Geoff

i've tried it on load and on current

rich, i put the code in and i still get the wrong count but now i get 1 of 1 (filtered), until i move to the next record and i get i of 2 and when i go back to the previous record i get 1 of 2 any other ideas you have would be greatfully received thanks geoff

Please someone help me

I've got until 2pm to get this done I have the following code Me.OrderNumber = Me.CurrentRecord Me.OfOrderNumber = me.RecordsetClone.RecordCount Which should show the record count for a subform, the problem is that it always shows order 1 of 1, until I move to the next order using a custom...

should be something like this = Left([FieldName],5)

The problem I have is that some controls are visible some are locked and others are not enabled. and I just wanted a quick way to open form and set all controls visible all unlocked and all enabled. if you do have any ideas let me know thanks geoff

I'm looking for a piece of code that will enable all fields and controls on my main form and subform. Thanks in advance

Cheers Jacob. It's always the smallest things that give you the most problems Thanks Geoff

I've got the following piece of code, which will save a record, but if it is a duplicate it will comeback with a message, telling you to enter a different order number, the problem is that even when I change the number to one that is unique It keeps on giving the same error Private Sub...

I have the same thing in a database i'm currently creating, I use one of the following ways to disable a box If Me!ComboBox1 = "Test" then Me!ComboBox2.enabled = false elseif Me!Combobox1 = "Test1" then Me!ComboBox2.enabled = False else Me!ComboBox2.enabled = True EndIf Or use Select Case...

1) Me!AutoNumber = Format(CLng(Right(DMax("[AutoNumber]", "Table1",), 5)) + 1, "00000") 2) Me!AutoNumber = "FM" & Format(CLng(Right(DMax("[AutoNumber]", "Table1",), 5)) + 1, "00000") You'll have to enter your own field and table names

I think (not promising anything) that this will do the job DoCmd.OpenReport "EmpContactLog", acViewPreview, , "[Month] = Format(Date, mm) mm = 01-12 mmm = Jan-Dec etc

If you click on the frame of your option group you can set an after update event for an option group

set an input mask so the user will automatically enter the data in one format

1) insert =Date() in the default value for the field or =Now() to include the time 2)use NETWORKDAYS Returns the number of whole working days between a start and end date, excluding weekends and any identified holidays. If this function returns the #NAME? error value, you may need to install...