Excelマクロで時刻を自動入力する方法:B1セルに現在時刻、C1セルに1時間後の時刻を表示

Excel

Excelのマクロを使用して、ボタンを押した際にセルB1に現在時刻を入力し、その隣のセルC1にB1の1時間後の時刻を自動で表示させる方法について解説します。このような自動化は時間管理やスケジュール管理を効率化するのに役立ちます。

Excelマクロの基本設定

まず、Excelでボタンを挿入し、そのボタンを押すとマクロが実行されるように設定します。これにより、ボタンがクリックされるたびに自動で時刻がセルに入力される仕組みを作成します。

ボタンを押したらB1セルに現在時刻を入力

まずは、B1セルに現在の時刻を入力する簡単なマクロを作成します。次のコードをVBAエディターに入力し、ボタンに割り当てます。

Sub SetTime() 
    Range("B1").Value = Now() 
End Sub

このコードは、ボタンが押されるとB1セルに現在の時刻を表示します。

C1セルにB1の1時間後の時刻を入力する

次に、C1セルにB1セルの1時間後の時刻を入力するためのコードを追加します。以下のコードを使用することで、B1セルの時刻に1時間を足した値をC1セルに表示できます。

Sub SetTimeWithOffset() 
    Range("B1").Value = Now() 
    Range("C1").Value = Range("B1").Value + TimeSerial(1, 0, 0) 
End Sub

このコードでは、B1セルに現在時刻を入力し、C1セルにはその1時間後の時刻を表示します。

まとめ

Excelのマクロを使うことで、時間の管理を効率的に行うことができます。この方法でB1セルに現在時刻を、C1セルに1時間後の時刻を自動的に表示させることができるので、仕事やスケジュール管理の際に便利です。是非、このマクロを活用して作業を効率化してください。

コメント

タイトルとURLをコピーしました