Search results

Cheers for feedback. I think i have found problem. From the access data that was being imported i had created various pivot tables. And to refresh them all when the data changed i had the following code in excel Private Sub Worksheet_Change(ByVal Target As Range) 'ThisWorkbook.RefreshAll...

Hi. I have connected one of my qry from my access database to an excel file via the get data button in excel ribbon. Data came through fine but it appears to be refreshing the data constantly. About every 3 seconds. SO while i am using the spreadsheet i get the curser change to the refresh...

Hi Gasman I tried this but kept getting errors. Will try again later tonight once home. THanks for all your help so far

Hi Thanks for above. I have done your suggestion and it achieves what i am looking for but creates another issue on the qry. On this form i have a subform that shows all the categorys and potsizes in it. As i choose a category this subform filters down to the selected catagory using the qry i...

HI I have a form with 2 comboboxes on it. I have a query that filters the results based on the 2 selections from the combobxes. However when i filter the results do not appear as expected. For example if i choose a categoryid = 1 product and a potsize with id 3 i get results for items that...

Hi I am creating an edit form whereby i can change the volume of compost a pot can hold. What i am trying to do is stop the person editing a pot size by by putting in the existing pot volume. I have the following code: If Me.Txt_NewVolume = Me.Txt_CurrentVolume.Value Then...

THnkas for this. Very useful article and that is what i am trying to do but i also want to create this 3 part name system because on another form i will use this name sytstem to select the pot that i want to plant my young plants into and it will stop me have to choose three comboboxes. I will...

Hi I have a form where i have 3 comboboxes, PotSize, Pot Shape, Pot Colour. These are independent of each and not linked in any way. As i select each combobox i want it to populate a Final Pot Name in a text box below the comboboxes. For example if i choose 2L (potsize) Round (pot shape)...

Worked a treat. Amazing and not much tweaking to the code which is a massive bonus as only noticed this error on my tenth form so have to tweak all old ones now. THanks so much

Hi I have the following code in a form to check whether the string being inputted already exsits in the data: On Error Resume Next Dim msg, style, title, response, MyString, field, source, criteria If Len(Me.Txt_NewTier2.Value & vbNullString) = 0 Then Else If DCount("Genus"...

Hi. Based on what you said i switched pop up off and then back on and now the forms appear again as i want them , THanks for your help .

Hi All. Been working on a database and this morning I have noticed something going wrong. If i double click a form of the navigation pane on right of access the form opens up in form view correctly. I close the form. All is good. I then open form in design view and then right click to...

Hi All. Been working on a database and this morning I have noticed something going wrong. If i double click a form of the navigation pane on right of access the form opens up in form view correctly. I close the form. All is good. I then open form in design view and then right click to...

Hi. I am trying to create a table that allows me to create a product description that is unique. To elaborate i have three table - Tbl_Category, Tbl_Potsize and Tbl_CaneType. Within category i have things like fruit, clematis, fuchsia (types of plants basically). Within potsize i have the...

Hi. FInally cracked it: Dim PreviousBatch As Integer Dim Newbatch As Integer PreviousBatch = Nz(DLookup("nextbatchno", "Tbl_BatchNo", "id=1"), 0) If PreviousBatch = 9999 Then CurrentDb.Execute "UPDATE Tbl_BatchNo SET nextbatchno = 1000 WHERE id=1", dbFailOnError Newbatch =...

Noticed some flaws with above code. Hard to explain them so will repost shortly with correct code.

Perfect. Thanks so much for all your help. Problem solved. THis was final code for completeness: Dim Newbatch As Integer Newbatch = Nz(DLookup("nextbatchno", "Tbl_BatchNo", "id=1"), 0) + 1 If Newbatch = 9999 Then CurrentDb.Execute "UPDATE Tbl_BatchNo SET nextbatchno = 999 WHERE id=1"...

Cheers DB. Is that in vba or do i need to tweak it so i can write a sql statement in vba. Apologies for all the novice questions. Was never great at access and its like my brina has been scrambled with a year away from the project.

Yep that works. So much simpler than my option. Many thanks