軟體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