I need help with a loop. I have a macro I need to repeat every 30 seconds.
The macro refreshs a web-query. I can manually do it but I need it to be
automated if possible. My knowledge of VB is very limited. Thanks.

Sub Refresh()
'
' Refresh Macro
' Macro recorded 1/10/2008 by HP Authorized Customer
'
' Keyboard Shortcut: Ctrl+x
'
Selection.QueryTable.Refresh BackgroundQuery:=False
End Sub