Sub 陣列無指定起始() Dim a(3) As Integer, i As Integer For i = 1 To 3 a(i) = i Next Sheets(1).Cells.Clear Sheets(1).Cells(1, 1).
確定! 回上一頁