人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excel(VBA)でラップタイマーを作成したい

A列のセルにはB列の同じ行のセルが空白であれば何も表示しない、
そうでなければ行番号-1を表示する
B列のセルには(恐らくここがVBA)アクティブセルが変化したら(ENTERが押下されたら)変化前のセルに分+秒.2桁の単位で記録していくようにしたいです。
この場合はどのようなコードをワークシートに記述すれば良いのでしょうか?
※これだと現在時刻しか記録されないと思いますが、この情報からラップタイムを算出することは可能なので、ここまでで大丈夫です。

●質問者: keijun5145
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● ohmix1

B1から初めて、Enterを押していくとB10まで現在時刻を記録します。
あとはなんとかなりますでしょうか?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set r = Application.Intersect(Target, Range("B2:B10"))
If Not r Is Nothing Then
r.Cells(1, 1).Value = Now
End If
End Sub

関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ