Vba.excel - problem with "GetObject"

[separator]

Hello, have a problem with recording a small macro
I need : 1. take some .xls fail; 2.put some data in it 3. save with other name
Maybe somebedy can said where is a problem in script?
Thanx.

Sub TestReport()

Dim Excelsheet As Object
Set Excelsheet = GetObject("C:\Book2.xls")

ExcelSheet.Application.Cells(2, 1) = "111"
ExcelSheet.Application.Cells(5, 1) = "222"
ExcelSheet.Application.Cells(9, 1) = "aaa"

Excelsheet.SaveAs "C:\report_test.xls"
Excelsheet.Application.Quit
Set Excelsheet = Nothing

End Sub

[Norie]

Why don't you just open the workbook?

Please Login or Register  to view this content.

[separator]

Why don't you just open the workbook?

Please Login or Register  to view this content.

Damn! It was so easy!

Norie great thanx !!

[Norie]

No problem.

By the way I don't think the rest of your code is going to work either.

As far as I know the Application object does not have a Cells property.

[separator]

No problem.

By the way I don't think the rest of your code is going to work either.

As far as I know the Application object does not have a Cells property.

Actualy, I think so too, but

the code is working right ! ))

[Norie]

I'm wrong.

The Cells property of the Application object refers to the cells in the active sheet.