Converting Excel VBA to Access VBA

[jo15765]

How would I change this code over from Excel to Access code:

Dim wks As Worksheet
Dim qt As QueryTable
 
For Each wks In Worksheets
For Each qt In wks.QueryTables
qt.Refresh BackgroundQuery:=False
Next qt
Next wks
 
Set qt = Nothing
Set wks = Nothing

The reason I am needing to, is I imported excel modules into access, and it doesn't appear to run this module.

[rpeare]

I don't use excel if I can help it. What is this code doing for you in excel?

[jo15765]

Taking all of the queries on in an excel spreadsheet and running them basically. It is what I called an "Auto-refresh" query, since the macro was doing it instead of me manually having to do it

[rpeare]

YOu don't need to refresh queries in Access. Any query you run against your data automatically uses the most recent information, if you want to modify the results you just alter the criteria.

[June7]

You imported modules but not the data? You still want to update the Excel worksheets?

[jo15765]

June it sounds like you are on the same page as me. Yes, I still need the data in excel to refresh, hence running that VBA.

[June7]

That prompts two-part question - why import modules and run from Access or why not import data and make it all Access app?

How did you execute the code when it was in Excel?

[jo15765]

The data is in excel, and it is a report with about 4 queries in it. I had a Workbook_Open() event that would run that code so the queries would auto-refresh.

The boss asked me to convert it from Excel to an access form, with buttons to press that would refresh the reports, hence me trying to convert the code from Excel to Access.

Basically, I am needing to be able to push a button on a form, and once that button is pressed open up the specified Excel Report, then run that line of code to refresh the queries.

[June7]

If you are not going to convert the data to Access and still want the workbook as the report output, I suggest you leave the code in Excel. Just use button in Access to open the Excel workbook.

[jo15765]

So actually leave that line of code in Excel, and have the button in access open the Excel Workbook?

[June7]

Exactly. Leave the Excel workbook set up as it was. Just open programmatically.