Search results

love is in the air...sorry i should have picked up on my code now looks like the below Private Sub cmbstag_AfterUpdate() Dim i As Integer Me.cmbasset.Value = Me.cmbstag.Column(1) For i = 0 To Me.lstloan.ItemsSelected.Count If Me.cmbasset.Value =...

Thanks for your patience on this Bob. I actually did mean to say i had tried it both with None and Simple. As of right now, the multi select property is set to simple and i have tried your code like below (forgive the namings - my textbox was previously a combo box) Private Sub...

Hey Bob i already tried comparing the Me.listbox.value to me.textbox.value and this hasnt worked both with the listbox multi select property set to simple or extended.

Hi Bob It's set to none

Hi again I am hoping there is a quick easy solution to this. I have a listbox and a textbox among several controls on my form. I have setup code to automatically populate the textbox but i want the value in the textbox to be checked or validated against values in a listbox and if the entry...

Hey Boblarson. Thanks for that. I had just seen the allowedits property in code. I have used that and setup all access levels accordingly Thank you very much for your help..

Does anyone know of a way to load a form Read-Only based on a condition, Say for example if user is of type "User" then load form readonly else load form normally. I know about the readonly property on the form property but that locks up the whole form regardless of who's viewing it and not on...

Thanks missinglinq. I will try that code on the before_update event today and see how I get on.

I have now got the below to work partially Private Sub Form_Unload(Cancel As Integer) Dim response As Integer response = MsgBox(prompt:="All unsaved data will be lost are you sure you want to close?", buttons:=vbYesNo) If response = vbYes Then Me.Undo DoCmd.DoMenuItem acFormBar, acEditMenu, 8...

Here's a question i have on this. I am trying to debug a database i have created and my code looks like this. Private Sub Form_Unload(Cancel As Integer) Dim response As Integer response = MsgBox(prompt:="All unsaved data will be lost are you sure you want to close?", buttons:=vbYesNo) If...

Thanks for the thought Gemma. The option of a command button at this stage looks like my main option. I will try running the code from there and see what happens in the subform. As far as requerying goes, i alreayd have macros setup to requery the subform on got and lost focus so hopefully this...

This is a good idea. As of right now, I have successfully acheived part of what I want by coding each individual control on the form. The problem i ran into when doing that is that i can only run one query at a time and i want to be able to run 2 or 3 queries based on selections within the combo...

Can some please look at the below for me and advice what i am doing wrong. I am trying to run a sql query based on data selected from comboboxes on a form, results of which are generated in a subform attached to the main form Private Sub Form_AfterUpdate() Dim LSQL As String Dim cmb As...