Search results

I included the brackets in the code and still get errors. How do you take the VBA to SQL? strSQL = "INSERT INTO Main Table ([Report Number], Rating, Pass " & _ "Fail, [Non Rated], [Chief Insp Review] " & _ "[Inspection Type], TEC, Date " & _ "Shift...

Thanks. I've been picking up a lot on this board. I included the 'Else' because I didn't know not to. No biggie. I've been looking at Select Case statements, but there are a few places where I don't think they'd be so helpful, but I think it may work for the inspection type. The field...

Actually, I figured this part out. Now I'm working on the SQL portion of the code. http://www.access-programmers.co.uk/forums/showthread.php?t=106480 Thanks for taking the time to respond. I ended up creating a form & table for the user to input the new file path. The DLookup/variable...

Well, I've made a little progress in my attempt to create an append query w/ VBA having a variable destination db. The first portion of code seems to work for now....That is, at least I don't get errors from it. However, when I run the code I get a syntax error (run-time 3134) in the INSERT...

I don't know exactly what you've got going on, but... I needed something similar in our db. What I did was created a 'temp' table where info was sent. The next time the function was run, that table was emptied and then appended w/ the new info. Hope that helps...

I opened it up and it worked fine. It might've been a problem w/ compression; it was set to Max. This one is normally compressed.

I honestly don't know if the DLookup(,,Criteria) is appropriate or not. That's one of the things that I need a little help on. If asterisks don't work for this it's not that big of a deal. I can load extra lines of code for the individual fields. And as far as I can tell, the varServer is a...

Oops. I goofed on the files. These are the correct ones. I changed the code a little bit and now get this error: Syntax error (missing operator) in query expression 'C:\'. Run-time error 3075. This is how the code line reads now. varDatabaseName = DLookup(Text1, "Main Table", " = '" &...

I was following this thread http://www.access-programmers.co.uk/forums/showthread.php?t=91128&highlight=append+query+vba and tried to implement that code, but no luck. I know there are parts of the code that I don't understand, and I need some schoolin'. The intent is to have the...

Bueller?...:confused:

Too much? Plenty of people have checked this out, but there's no feedback. I'd take almost any kind of input. This is pretty serious, and I'm seriously stuck.:(

Here's the deal. The Assessment Form is where all the data is loaded, but for some reason a couple of queries don't include records w/ blank fields while other queries will include them. This skews the numbers so bad that different reports and pivot tables come up w/ different numbers. I...

Thanks also to MStCyr for the greenbar report. http://www.access-programmers.co.uk/forums/showthread.php?t=103876

Thanks for all the help, whatever. I decided not to pursue the 'all' function. It might come in handy in other portions of our db, but for this report it's really not necessary. I'm posting the finished version in the samble db forum...

This db uses a multi-select list box as criteria for reports. There are four subreports in the main report. The reports also include 'sum' and pecentage equations. It also has the 'greenbar' code found on this board. The input form has a calendar to date function (double-click date fields to...

Attached is a log-on example that creates user-levels identified as Cases is VBA. Pasted below is the code for a module that will enable/disable the shift-function on opening the db. Maybe between the two you can come up w/ something. I don't have anything about this for a specific form...

Whoo!!! Thanks! It works like a champ. Now I'm trying to include an 'all' function into it. Thanks again! This is going to make a HUGE difference! When I'm done w/ the 'all' function I'm going to load it under the Sample DBs forum. I'll make sure to give you credit for it.:cool:

Thanks for the help. I've tried it out at home using OfficeXP and got an error. This is the code that I have now. Dim vItm As Variant Dim stWhat As String Dim stCriteria As String Dim stSQL As String Dim loqd As QueryDef stWhat = "": stCriteria = "," For Each vItm In...

I've search through several databases that use multi-select list boxes as criteria for queries, but there was only one that used it to open reports. I can't remember the guy that made it, but I got it from this board. At any rate, I can't get it to work. I get an error saying it's too...

OK. I think I've got it down to the bare essentials. The opening form has two buttons. The first one has no command attached to it for you to use/change if you want. The other has the original archive code in it, minus the several other queries removed to shrink the size of the db. Just to...