软件Excel 版本2013
各位大大午安，小弟遇到一个物件的问题想不通，请高手指导一下。
以下是我的程式码。
在for循环的时候出现"此处需要物件"的错误。
我不是很懂，我不是已经在With fileA底下了吗？
也.Activate了，怎么会没有物件?
另外，如果没有物件，那我又怎么能够正确地找到最后一笔资料?
但是ggg却可以读到资料。
烦请指导，感恩。
Workbooks.Open Filename:=dpath & "\" & Fname & ".xlsx",
Set fileA = Workbooks(Fname & ".xlsx")
'=====================================================
'=======================写入档案======================
With fileA
.Activate
ActiveSheet.Range("A1").Select
Application.Goto reference:=ActiveSheet.Range("A1")
ActiveSheet.Range("A1").End(xlDown).Select '找到最后1笔资料
index_row = Selection.Row
index_column = Selection.Column
ggg = ActiveSheet.Cells(124, 1).Value
For c = 1 To 8
Head_previous(c) = AcitveSheet.Cells(index_row, c)
Next c