エクセルの式の質問

質問

A1にRAND関数が入力されていて、ランダムな数字が切り替わる度に

B1,B2,B3・・・・B1000,B1001,B1002に順次

書き込んでいくというような事はできるのでしょうか？

わかる方いましたらよろしくお願いします。

回答No.1

keithin · ベストアンサー

それは結果してB1からB100に　=RAND()　を記入しておくことと等価です。
それとも出た目を固定してみたい事が目的なら，=RAND()を記入したB1:B100を丸ごとコピー，その場で形式を選んで貼り付けの値のみ貼り付けて値化してください。

＞できるのでしょうか

次のように操作すれば，特に難しいことをしなくても出来ます。

手順：
シート名タブを右クリックしてコードの表示を選ぶ
現れたシートに下記をコピー貼り付ける

private sub worksheet_calculate()
range("B65536").end(xlup).offset(1).value = range("A1").value
end sub

A1に
=RAND()
を記入する
あとは勝手に再計算されます。

お礼

補足や手順まで
あまりエクセルに詳しくない
私にもすぐできました。

ありがとうございます。

回答No.2

kmetu

たとえば
該当シートのマクロに

Private Sub Worksheet_Calculate()

Application.ScreenUpdating = False
Application.EnableEvents = False

If Range("B1").Value = "" Then
Range("B1").Value = Range("A1").Value
Else
Range("B" & Range("B" & Rows.Count).End(xlUp).Row + 1).Value = Range("A1").Value
End If

Application.ScreenUpdating = True
Application.EnableEvents = True

End Sub

としておけばいかがでしょう。

お礼

やりたいことが
できました。

助かりました。
ありがとうございます。