hi
Private Sub Workbook_Open()
Sheets("sheet1").Range("A1").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
End Sub
edit the range address to suit your data.

regards
FSt1

"DWIGHTBALLMORRILL" wrote:

Is there a way to setup a Query to automatically refresh when you open it up?