EXCEL2002を使用しているのですが画像のように抽選ボタンを押すと

質問

EXCEL2002を使用しているのですが画像のように抽選ボタンを押すとランダムでアタリとハズレが
表示されボタンの下に抽選をクリックした回数が表示されます。
ここまでは作成したのですが、アタリが表示されたときにアタリまでのボタンクリック回数を履歴で表示させてカウントを０に戻すというのを作りたいのですがわかりません。
どうか教えていただけないでしょうか。

回答No.2

mt2008 · ベストアンサー

ANo.1です。

> アタリ履歴の数字は自分が適当に完成系を想像して入れただけなので
> 履歴そのものの作り方が知りたいのです。

そのつもりで書いたのですが説明が不足していましたか。

今現在のマクロの作りが以下の様になっていると推測しました。
＜抽選＞ボタンをクリックすると、セルC7の値を+1、乱数で抽選を行い、当選の場合はセルC3に「アタリ」と表示。

この推測が大きく外れていたら補足してください。
で、「アタリ」と表示する処理の直後に、ANo.1の2行を追加すると、D列に当選まで抽選ボタンを押した回数が追加されていき、セルC7のカウントが0に戻ります。

回答No.1

mt2008

履歴の最終行を得る方法が判らないと言う事でしょうか？
↓で、アタリ履歴欄（D列）の最終行が取得できます。
Range("D" & Rows.Count).End(xlUp).Row

この１つ下のセルにC7の値を入れてC7に０を入れてやりましょう

Range("D" & 1 + Range("D" & Rows.Count).End(xlUp).Row).Value = Range("C7").Value
Range("C7").Value = 0

補足

アタリ履歴の数字は自分が適当に完成系を想像して入れただけなので
履歴そのものの作り方が知りたいのです。