質問: エクセルで時間入力 エクセルで、マクロを使用してフォームボタンを押したら現在の時間を セルに入力するにはどうしたらよいでしょうか?
回答: マクロでやるなら、下記のような関数があります。 now ..現在の日付と時間を返す。 time ..現在の時間を返す。 hour(time) ..引数timeから"時"を取り出す。 minute(time)..引数timeから"分"を取り出す。 second(time)..引数timeから"秒"を取り出す。 ------------------------------------------------------------- sub time01() activecell.value = "現在の日付と時刻 : " & now activecell.offset(1, 0).value = "現在の時刻 : " & time activecell.offset(2, 0).value = "ただいま " & hour(now) & "時です。" activecell.offset(3, 0).value = "ただいま " & minute(now) & "分です。" activecell.offset(4, 0).value = "ただいま " & second(now) & "秒です。" end sub シートにボタンを置いて使うなら、ボタンにマクロを登録する。 フォームを使用するなら、フォーム上のボタンをダブルクリック すると、コードを入力する画面が開くので private sub commandbutton1_click() '..ボタン1が押された時の処理 ここに記述します。 end sub おわかりだと思いますが、activecell~はcellsなり、rangeなり適当 に変えてください。