Mypath = ThisWorkbook.Path
MyFile = "\FIXED_PSAString.xls"
Workbooks.Open Filename:=Mypath & MyFile
Set FixPSA = Workbooks("FIXED_PSAString.xls").Sheets(3)‘第3个sheet的name为"sheet3"
’这里的TestCell其值竟然不是B2的值！！！
Set TestCell = FixPSA.Cells(2, 2) ' 中间我省略了很多代码，重点在这里
经过我的查找，发现竟然是C44,求高手解答啊，我一下午就这样废了，泪奔。。。
vba 挑战?Excel
------解决方案--------------------------------------------------------
问题应该是出在你省略的中间代码上