Hi all,

I think I have a similar problem as SiriS.

Part of my coding is as follows:

ChDir "C:\Done"
FDir = "C:\Done\"
Workbooks.Open FileName:=FDir + GetFileName(x)
Windows(GetFileName(x)).Activate

Sheets("NewConds").Select
Cells.Select
Selection.Copy

Windows("New Book.xls").Activate
Sheets("NewConds").Select
Cells.Select
ActiveSheet.Paste

When the Macro ran to the line ActiveSheet.Paste, an error message will
be prompted as follows:

Run-time error '-2147417848 (80010108)':
Method 'Paste' of object '_worksheet' failed

In fact, I don't know why it happened. I use these codings before and
they are Ok. Same as SiriS, I am using Excel 2002.

Can someone here help us to solve the problem? Thanks!


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