"Dave Peterson" wrote

Workbooks("Sheet1.xls").activate

Might do it.

No but I did crack it with your help. I did

Private Sub Workbook_Open()
Workbooks.Open Filename:="http://www.mywebspace.com/data.csv"
ActiveWindow.WindowState = xlMinimized
ActiveWindow.WindowState = xlMinimized
ActiveWindow.WindowState = xlMaximized
ThisWorkbook.Close savechanges:=False


End Sub

Thanks for your assistance. I'm most grateful.

Best

A