Function temp234() Dim arr(1 To 10) As Integer For i = 1 To 10 arr(i) = i. Next i '橫向寫入. Sheets("test").Range("a1:j1") = arr '直向寫入. Sheets("test").
確定! 回上一頁