Trouble with Query Tables & VBA

[nmay732]

I have a correctly connected query table on a worksheet called "SQL Data" that I can refresh manually no problem.
However, when I run this VBA code I get the following error:

Dim ws As Worksheet
Set ws = Worksheets("SQL Data")

'Refresh the SQL Table'
Worksheets("SQL Data").QueryTables(1).Refresh

>>ERROR: Subscript out of range

On further inspection using the Locals pane, I found the count of the object QueryTables for ws is 0

Why is the table not being added into QueryTables?

 

[xenou]

Excel 2007 uses a new syntax for addressing query table objects - maybe that's all? Try the syntax shown here:
QueryTablesXL2007

 

[nmay732]

Thanks for replying!

I actually found that using ActiveWorkbook.RefreshAll did a clean job of refreshing my single table.

 

[nmay732]

Actually, I ran into an issue where I wanted to edit the command for a table, where I still needed to access the table data. Your link is really the better option. Here's the code I used to just view the command of my table if anyone has the same issue:

Dim lo As ListObject

For Each lo In MyWorksheet.ListObjects
    Debug.Print (lo.QueryTable.CommandText)
Next

I should have specified in the original post that I'm using Excel 2010.

Thanks again!