Copy method of worksheet class failed (Run-time Error 1004)

mangoel · Apr 15th, 2002, 05:49 PM

Hello All,

I am trying to create a copy of an Excel worksheet using the copy method in Visual Basic and am getting the following error message:

"Run-time error 1004:
Copy method of worksheet class failed"

I have reduced my code to something as simple as the following just to debug this problem.
---
Private Sub CommandButton1_Click()

Worksheets("Sheet1").Copy after:=Worksheets(Worksheets.Count)

End Sub
---
This code works perfectly well on my machine at home running Excel 98, but gives the above err mesg on my machine at work running Excel '97.

How do I fix this?

I'd really appreciate your help.
Thanks!

Manish

Tom Schreiner · Apr 16th, 2002, 12:29 AM

Hi
These are both shots in the dark...
Better than no shot at all?
Anyway, try these two things first.
For your command button set the "take focus on click" property to false.
Also, place this line of code before your copy method.
Range("A1").Activate
Doubt it will help but who knows...
Tom

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 15th, 2002, 05:49 PM	#1
mangoel New Member Join Date: Apr 2002 Posts: 14	Hello All, I am trying to create a copy of an Excel worksheet using the copy method in Visual Basic and am getting the following error message: "Run-time error 1004: Copy method of worksheet class failed" I have reduced my code to something as simple as the following just to debug this problem. --- Private Sub CommandButton1_Click() Worksheets("Sheet1").Copy after:=Worksheets(Worksheets.Count) End Sub --- This code works perfectly well on my machine at home running Excel 98, but gives the above err mesg on my machine at work running Excel '97. How do I fix this? I'd really appreciate your help. Thanks! Manish

Apr 16th, 2002, 12:29 AM	#2
Tom Schreiner Board Regular Join Date: Mar 2002 Location: Cincinnati, Ohio, USA Posts: 6,824	Hi These are both shots in the dark... Better than no shot at all? Anyway, try these two things first. For your command button set the "take focus on click" property to false. Also, place this line of code before your copy method. Range("A1").Activate Doubt it will help but who knows... Tom