Search results

Thanks so much for the revamped VBA, appreciate it! However, I'm having trouble getting it to work on my 2007 db. I built it as a 2007 accdb on a 2010 machine. It works if I open and run it on my 2010 machine but not on my 2007 one. Same thing, if I hit Search with no criteria, it will fill the...

Hi, I have been using the below that I found on this site years ago on a search form. I recently pulled it into a 2007 db and it will not work. It works in 2010 but, when I imported the form and code into a 2007 db, the reference to "Microsoft Forms 2.0 Object Library" gets removed. I found it...

The list box wasn't populating with the data when the projectid changes on the form. As I suspected, I was referring to the incorrect form names - tabbed forms are new to me and I got confused as to which form I need to reference in my row souce criteria filter. Thanks for the tip on the...

Hi, I have a form with 4 tabs each with a subform. They are linked to field "ID" on the main form. On the 4th tab I have a subform (Form1) and a listbox (List26) that I am filling with a query but I can't get it to change when my project (ID) # changes. I have gone into the query and tried...

Isskint, that was it, thank you! Working as it should. Regarding your question, I didn't want the user to have to highlight all of the items in list2 in order to add to the table so this just does it for them. Thanks again! Toni

I am trying to get the below to work to loop through my listbox (List2) and append the new records to my table. It will only append the 1st record added to the listbox but is appending it multiple times based on how many items are selected. For example I have the following items in the list box...

Thank you! So, from what it looks like, I was closing out the criteria before I added my 2nd criteria?

Me again, I have to add another criteria to the previous DLookup, thought it would just be a matter of adding ...And ... =DLookUp("[On Order Qty]","Demand","[Initiative Nm]='" & [Initiative Nm] & "'" And "[Distrib Mthd]='" & [Distrib Mthd] & "'") Both Initiative Nm and Distrib Mthd are...

I thought about it more and, since I was already summing and grouping by initiative in my query, I thought I should just use DLookup instead of DSum - does that sound correct?

Got it! =DLookUp("[On Order Qty]","qryDC_Demand","[Initiative Nm]='" & [Initiative Nm] & "'") Thanks everyone for getting me on the right track - needed single quotes! You guys rock as always!

I left out what is probably an important part of my problem. The total I am trying to place in the DSum text box is for the entire set of data whereas my report is just showing a subset of that data. So, if I were to total by initiative all the "On Order Qty" for what is showing in the report...

Cannot figure out why this won't work. Tried looking at several DSum examples but either get an error or no data at all. I have a report grouped on "Initiative Nm". The "Initiative Nm" text box is under the Initiative Nm header. I placed a text box in that same header area with a DSum...

Hi there, I've looked at many posts where they are using blnHeaderRow = True but I can't get it to work for me. No errors, just won't bring over the headers from my Access query. I've tried placing the line everywhere in my code with no success. Any ideas as to where i might be going wrong here...

Hi Pat, I've always had the issue with Nz not working in Excel but perhaps I just haven't been able to find out why. If I go to make my connection to Access, and, when it gets to the step of selecting the query that I want to bring into Excel, any query I have the "Nz" function in, never...

I figure it out! Sum(IIf(IsNull([LateQty (22 - 28 Days Late)]),0,[LateQty (22 - 28 Days Late)])+IIf(IsNull([LateQty (> 28 Days Late)]),0,[LateQty (> 28 Days Late)])) Hopefully this may help someone else. Thanks! Toni

Hi there, I need to get the equivalent of the Nz function below so that I can connect my query to an Excel workbook. Since Excel does not allow Nz. Expr1: Sum(Nz([Late (22 - 28 Days Late)],0)+Nz([Late Qty (> 28 Days Late)],0)) Trying something like this but can't get it working-would...

Well that wasn't very smart, I typed the syntax with a "," between the two lines but, when I posted my question, left it out, which apparently is how it should work :) Took the comma out of my vba and all is fine. Thanks!

Thought this would be easy, but getting error message Want to run an import spec that imports and appends data from Excel to my Access table. I ran the import process, saved the import spec, naming it "Import-PGI_Data" then, in my VBA for my button: DoCmd.RunSavedImportExport...