I keep recieveing an application error whenever i run ths
code but I am not sure why.

Here is the code (The part that matters anyhow):

'...open the superval file into excel
Workbooks.OpenText Filename:=PName,
Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited,
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False,
Tab:=False, Semicolon:= False, Comma:=False, Space:=False,
Other:=False, FieldInfo:=Array(1, 1)

Workbooks(Prog_Name).Worksheets("Cat
Data").Columns(1).Value = Workbooks(FName).Worksheets
(1).Columns(1).Value

The compiles and run but only get down to a cell where the
value is "=======================================" could
this be the reason it is crashing. It also might be
because there is a limit of around 8000 rows but I doubt
it.

Any ideas where I am going wrong?

Thanks in advance