Cells (1, count * 6 + 1).Resize(1, UBound(title) + 1) = title 083 084 '交易日資料填值 085 For Each line In tmp.Areas 086 For j = 1 To line.Rows.count 087 .
確定! 回上一頁