A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
こんにちは
仮にフォームがUserForm1、ラベルがLabel1とするなら、標準モジュールに
Private flag As Boolean
Sub timeDisp()
UserForm1.Label1.Caption = Format(Now, "hh:mm:ss")
DoEvents
If flag Then
Application.OnTime Now() + 1 / 86400, "timeDisp"
End If
End Sub
Sub timeStop()
flag = False
End Sub
のようなものを用意しておいて、
・フォーム表示時にflag=TrueにしてフォームをShow
・フォームのInitializeイベントでtimeDispを呼び出し
することで、時刻が表示(更新)されるようになります。
ただし、そのままではずっと更新され続けますので、
・QueryCloseイベントで、timeStopを実行するなどが必要となります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ユーザーフォームのラベルに時間を表示させてずっと時間がちゃんと動くような方法はありますか?コード書い 2 2023/03/28 03:48
- Visual Basic(VBA) ユーザーフォームのラベルに日付を表示させる方法があればお願いします。出来ればコード書いていただけると 1 2023/03/24 15:06
- JavaScript 空白で入力フォームのボタンをクリックしたら、ブラウザの上部からjavascriptで 表示されるアラ 1 2022/05/20 11:16
- Visual Basic(VBA) ユーザーフォーム上に現在日時と時刻を表示させていますがフォームを実行すると時間が更新されません。それ 2 2023/02/21 22:28
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- JavaScript フォームが空欄の時にフォームの外をクリックすると、エラーが出るコードを調べています。 1 2023/06/25 11:51
- JavaScript 読み込んだQRコードをフォームに受け渡したい 1 2023/05/18 11:18
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- JavaScript ソースコードは下の共有コードサイト「張り紙」にあります。 入力フォームの javascript で 1 2022/05/11 11:01
- その他(買い物・ショッピング) JANコードの登録について 1 2022/07/23 14:19
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
ユーザーフォーム上に現在日時と時刻を表示させていますがフォームを実行すると時間が更新されません。それ
Visual Basic(VBA)
-
ユーザーフォームに今の時間を表示
Access(アクセス)
-
ユーザーフォーム時間表示
Excel(エクセル)
-
-
4
ユーザーフォームに入力したデータを保持する方法
Visual Basic(VBA)
-
5
excelVBA コンボボックスに時刻で表示したい
Excel(エクセル)
-
6
VBユーザーフォームで時間入力
Visual Basic(VBA)
-
7
UserForm1.Showでエラーになります。
工学
-
8
ユーザーフォームに日付を表示させる方法を教えてください。そして、実行したあとでも日付が変わるようなプ
Visual Basic(VBA)
-
9
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
10
エクセルVBAでフォームのListboxをスクロールするには?
その他(Microsoft Office)
-
11
テキストボックス(VBA)でEnterを押したときに作動するマクロ
Access(アクセス)
-
12
.NETで現在時刻を常に動作させる方法。
Visual Basic(VBA)
-
13
EXCELのセルへ、デジタル時計を表示できますか?
Excel(エクセル)
-
14
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
15
VBAで○○:○○と表示させたいのに小数で0.53125のように表示さ
Access(アクセス)
-
16
マクロ実行時、ユーザーフォームにラベルのテキストが表示されません。
Access(アクセス)
-
17
リストボックスの選択解除
Visual Basic(VBA)
-
18
ユーザーフォームのラベルに時間を表示させてずっと時間がちゃんと動くような方法はありますか?コード書い
Visual Basic(VBA)
-
19
現在時刻をリアルタイムで更新するには?
Excel(エクセル)
-
20
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelにて、ユーザーフォームで...
-
ユーザーフォームを表示中にシ...
-
ユーザーフォームのテキストボ...
-
エクセルVBAのフォームを最...
-
Form_Load と Form_Activate の...
-
クリックイベントなのに、2回ク...
-
VBAでユーザーフォームを再表示...
-
ExcelVBAのユーザーフォームの...
-
エクセルVBA フォーム上でOnkey...
-
VBA(エクセル)のユーザー...
-
[VB6] フォームを閉じる方法に...
-
複数モニタ使用時のフォームの...
-
テキストボックス入力データの...
-
Microsoft Formsの「個人情報や...
-
モーダルフォームとモードレス...
-
ユーザフォームの印刷
-
フォームを最背面に設定したい...
-
Ctrl+F4を押してもフォームが...
-
ACCESSのフォーム、開くんです...
-
Microsoft Forms とか、それに...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ユーザーフォームを表示中にシ...
-
ExcelVBAのユーザーフォームの...
-
ユーザーフォームのテキストボ...
-
クリックイベントなのに、2回ク...
-
MSGBOXのフォント大きさ変更
-
VBAでユーザーフォームを再表示...
-
Hideについて(.NET)
-
Form_Load と Form_Activate の...
-
モーダルフォームとモードレス...
-
コントロールの存在確認
-
ユーザーフォーム上に現在日時...
-
【VBAユーザーフォームで閉じる...
-
エクセルVBAのフォームを最...
-
ACCESSのフォーム、開くんです...
-
Microsoft Formsの「個人情報や...
-
VBA(エクセル)のユーザー...
-
フォームウィンドウを最前面に...
-
ユーザーフォームのラベルに時...
-
'ユーザーフォーム右上隅の[×...
-
Excelにて、ユーザーフォームで...
おすすめ情報