二维数组批量赋值问题,求大神救救!
FT_Sig(FileNum) = Application.Transpose(xlSheet.Range("AV37", xlSheet.Range("AV37").Offset(i - 1, 0)).Value)xlBook.Close (True) Next MsgBox FT_Sig(2, 5) xlApp.Quit Set xlApp = NothingEnd Sub