Re: [VBA ] Excel問題..如何將亂數值一筆一筆儲存ꠠ…
沒人回答我的問題，所以我來回答你的問題了
假設你的亂數是存在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
推
05/05 02:20, , 1F
05/05 02:20, 1F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章