Search results

Ok but that wont work because the Main forms name will be different each time. Is there a way to make the queries dynamic?

Hi, I have 6 subforms that i want to use on multiple forms. So to save creating a great many additional subforms and associated queries i am trying to make the subform queries dynamic. At the moment i have this in the query criteria: [Parent]![LocationRef] But it isnt working? The subforms...

Well I never! I went off and suddenly had an epiphany!! The solution was simple: All i did was once the user had selected the location by clicking on the round location button, I simply passed the position number back to the Input form which is a bound form and of course the record is saved in...

Hi everyone, I have been on this thing on and off for months now and it is so close but due to my uselessness and plain stupidity i just cannot get this last bit working!!! Obviously i am as usual missing something but i feel i am just chasing errors around??????? I send entered data from an...

Hi Pat, yes it was your guidance that enabled me to get where i am with it. I just reported back here so that everyone can know the outcome in case it may help someone else. Thank you once again

Well everyone - Thank you all so much. I have managed to get it working with the buttons and all seems fine at this stage (still more to build and test). What i did was i changed the table relationships and also removed the Lookup tables as suggested. I tried all types of crosstab queries but...

Wow everybody! And thank you SO much for all your advice and replies. I am taking it all on board. It is now working after using the case statement. I did also look at using a function. I just need to refine it now and look at all your options but the main thing is that it is working for...

Hi, Being self taught i do not fully understand all vba functions and procedures and which best to use yet. I have this code: Private Sub Form_Current() Me!Position1QrySubform.Form!Type.SetFocus If Me!Position1QrySubform.Form!Type = "Foam" Then Me.Btn1.BackColor = RGB(255, 228, 181) Else If...

Ja. maar ik heb ook net een ander idee. Dank u

Hi again, Well i have been trying all kinds of things but still getting no-where? The subform you see here, based on this SQL crosstab produces rows for each type of extinguisher which i then cannot get all of them to be inserted into the the position combos. I can only obviously get one rows...

That would be a lot easier :)

I think it will work but i'm just trying to get my head round it. I can colorize the buttons fine and i can move them anywhere on the picture which is fine but they will eventually stay in their particular locations. I wouldnt know what else to use other than Access? At the end of the day it is...

Ok, i will keep trying to get it - Thank you

Hi Pat, I think i have the crosstab working but i am not quite sure about this 'The rowSource for the position combos will be to the type table.'? What position combos? Sorry if i am being stupid but i have been trying all kinds of things and re-reading this but still just cannot see it? I...

Absolutely brilliant Pat! Thank you SO much for your time. The entry form i disabled the other fields temporarily to focus on this problem only just now. Before you replied and on giving it more thought i actually created a crosstab query as you describe and so i will now see how i get on with...

Thank you so much Pat! Sorry for the delay but here it is. It is still very much in development stage. The only location currently working as i try and solve this is 'The Mess' in all selections. You will see that on entering an item, once you click save you are then able to click on a button...

Hi Pat, Thank you for that. The subform is on there as an unbound form based on a query. I'm just trying to think of a way to achieve this? Hmmmmm This form is based on one building of which there are in excess of twenty other buildings. Some of the locations of the items may be blank at the...

So i am trying to check the subform data in the field "Position" with this code but i really am not sure how to do this? I am just trying out ideas. Me!MessViewSubform.Form!Position.SetFocus If Me!MessViewSubform.Form!Position.Text = "1" Then Me.Position1.Text = "1" If...

After reading your post again you are right. Hmmm have to think about that? I do have images of the coloured circles i need that i could use?

I'm not actually using visio, its just our own drawings inserted as an image on the form. What i am trying to do would be something like: Insert into (from the data in the subform or from the table or query?) position 1 where the number = 1 and insert into 2 where the number = 2 and so on?