I'm sorry Tom, I went and copied it but I forgot to paste it to thi
message. I listed it below this time.

Range("A2322").Select
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;C:\Documents and Settings\rg42735\Desktop\Monthl
Reports\Work in Progres
Report\MonthlyReportCSVs\CA\URLTemplateAction." _
, Destination:=Range("A2322"))
.Name = "URLTemplateAction._6"


Thank you,

Morr

--
Message posted from http://www.ExcelForum.com