Search results

No problem at all. Happy to help. As far as your update to the error handler it shouldn't be necessary. If the user doesn't select a file it wool just close. If you want to show an error if they don't pick anything, put an else in the "If .show = true" statement. You should try to code to avoid...

Can you post what you have so far so we can get a better idea of what you're trying to do?

I think what abbaddon is getting at is if the database is in a shared location you can store your tables in a second database and use linked tables in your front end locations. If not, it's fairly easy to import/export an access table. Here is some sample code to bring up the FileDialog box to...

JHB is right. Use oApp.Quit Once you close the active document there is not an active document anymore (unless you have multiple files open). I would suggest just doing the oApp.Quit method and commenting out your close command. The document will close if the application quits.

This works in 2007. Might need some tweaks to work in 2003. First, you need to put a "Content Control" in your word doc. Open your document, click on the developer tab, select rich text, then enter the name for the field (i.e. FullName). Then, in Access, you need to reference the Microsoft...

It appears you've taken full credit for my code...

OK, this is much simpler than I originally understood: Notes: 1. You didn't give me tble_practice so instead I got the list of KCodes from tble_Activity. 2. You will still need to tweak it a little bit as I can see that the numbers aren't coming through in the right rows. However, since I...

If it still doesn't work once you have the code fixed then post your code again.

The only way I'm going to be able to actually write the query for you is for you to post your database.

Went through your code a little more thoroughly. Found a few issues: Example 1 Concepts: 1. Don't Dim variables in the middle of your code. It makes it difficult to read. Put all of your variable declarations in the top of your sub. 2. Use consistent indentation. For example, your If and...

I've got some general tips for you that I'll post later but I just noticed this: If rstset.RecordCount > 0 Then rstset.MoveLast rstset.MoveFirst Do Until rstset.EOF setorg = rstset.Fields("OrgID") sql = "Update c_orgs Set setup = True Where adminid='" & AdminID & "'"...

What about Dave's suggestion? Is that how your files are coming out? I'm having a hard time following your code. From what I'm looking at, it doesn't make sense why this ISN'T creating multiple files on your machine. Can you post your database?

Make sure you make the change to destinationFile as well

If you were using API, you would probably know it. Doesn't look like it here. Might be that part of your problem is that in Windows 7, the user's desktop is by default located at C:\Users\[Username]\Desktop instead of "Documents and Settings." You can get the user directory more reliably like...

I keep telling people, nearly anything is possible.. just depends on how much work you want to put into it. To create the popup to allow for user input you have a few options. 1. Very simple, no-frills option: Dim TempUser As String TempUser = InputBox("Search returned no results. Please...

Are you using windows API? Can you post the offending code?

Good point.

Please read these carefully. You're looking for the Microsoft EXCEL 12.0 Object Library.

Yes. And I'll just quote myself here instead of asking again.

Sure, but you're not doing any of that calculation inside of the crosstab query. Your crosstab query is simply summarizing the data you have already calculated.