推 pureshores:大謝^口^ (臨時被拉來寫VBA整個是一切不通XD 謝謝謝謝) 05/05 02:20
沒人回答我的問題,所以我來回答你的問題了
假設你的亂數是存在sheet1.range("a1:j1")
Private Sub CommandButton1_Click()
n = 20
For i = 1 To n
Sheet2.Range("a1").Offset(i - 1, 0).Resize(1, 10).Value = _
Sheet1.Range("a1:j1").Value
Next i
End Sub
※ 引述《pureshores (純淨海岸)》之銘言:
: 我的Sheet1會產生10個亂數
: 我希望每產生一次 就可以儲存到Sheet2的一列 (A1:J1)
: (再產生一次亂數,就儲存到B2:J2...類推)
: 請問該怎麼寫呢?
: 小妹先謝過解答的大大了~ <(_ _)>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.224.43.22