copy a sheet in excel to another workbook through macro

[Jibanendu]

Hi,

I have been trying to copy an excel sheet to another excel sheet through VBA macro. I am new to this macro concept. Currently I have using Ms-Excel 2004 in MAC.

Below is the code that I wanted it to execute but it is showing some problem i.e Run Time Error 9 subscript out of range'

/*****Start of Code******/
Sub Mover2()
ActiveSheet.Move Before:=Workbooks("/Users/jibanendu/desktop/abc.xls").Sheets(1)
'Moves active sheet to beginning of named workbook.
'Replace Test.xls with the full name of the target workbook you want.
End Sub

/*****End of Code******/

Please guide me through and help me out to resolve this error,cause I am in serious need of this.

Thanx in advance,
Jibanendu

 

[Jibanendu]

Please help me out guys.....

 

[GTO]

Hi there,

I do not have Mac, but I think you want to ditch the path to the other workbook. As the destination wb must be open, you should just need abc.xls

Mark

 

[Jibanendu]

Hi GTO,

Thanks for your help,
Even I tried to open the xls file i.e abc.xls

the file gets opened but nothing is copied from active workbook to abc.xls.

following is my code

Sub Mover2()

Workbooks.Open Filename:="abc.xls"
ActiveSheet.Move Before:=Workbooks("abc.xls").Sheets("Sheet1")

End Sub


PLEASE HELP ME OUT!!

Thanx in advance
Jibanendu

 

[VoG]

Perhaps

Sub Mover2()
Dim a As Worksheet
Set a = ActiveSheet
Workbooks.Open Filename:="abc.xls"
a.Move Before:=Workbooks("abc.xls").Sheets("Sheet1")
End Sub

 

[Jibanendu]

Thanx , it is working right now. Thanx for your help