刚自学VBA，求助

Question

前辈们帮我看看下面的代码什么问题啊，小的刚自学VBA，练习对象
运行说“子过程或函数未定义”，停留在行12，列11的位置即“wooksheets("test1").Range("B2").Value = wookbooks.name”，黄箭头指向private sub macro1()
-------------------------------------------------------------------------
Private Sub macro1()wookbooks.CloseChDir "D:\ST\VBA\charter3.5"wookbooks.Open Filename = "对象.xls", readwrite = True
wookbooks.wooksheets("test2").Activate
wookbooks.wooksheets("test2").Hyperlinks.Add.Range ("A1"), "www.sohu.com"wookbooks("对象.xls").wooksheets("test1").Activate
wooksheets("test1").Range("B2").Value = wookbooks("对象.xls").name
End Sub------------------------------------------------------------------------------------------------
在excelhome发帖，没什么人愿意指点。。特郁闷。。诚心求助

Answer 1

wooksheets("test1").Range("B2").Value = wookbooks.name
应为
Worksheets("test1").Range("b2").Value = ThisWorkbook.Name