
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
過去の質問から勝手に推測すると、例えば
・問題の解答をセルに書き込みながら、且つ経過時間はリアルタイムで表示させたい
みたいなものを作りたいのかなって感じましたけど、外れてたのならNo.2は無視して下さい。
単にユーザーフォームに時間を表示させるだけなら検索しても見つかるので、もっと違うものかと思ってました。。。
考えすぎたかな?
一昔前にそんな質問を見かけたような覚えがあったもので。
No.3
- 回答日時:
UserForm1上にラベルを1つ作成してください。
(Label1とします)フォームモジュール上に、下記を作成します。
Private Sub UserForm_Initialize()
Call 時間表示
End Sub
標準モジュール上に下記を作成します。
Public Sub 時間表示()
UserForm1.Label1.Caption = Now
Call Application.OnTime(Now + TimeValue("00:00:10"), "時間表示")
End Sub
フォームを起動すると10秒間隔でラベルに時刻を表示します。
No.2
- 回答日時:
>実行したあとでも日付が変わるようなプログラム
これって最低でもAM0:00を跨ぐようExcelを動かし続けるのでしょうか?
その間日付だけ表示してぼ~っとさせている訳ではないと感じますが、外れてますか?
感覚的には時計を表示させつつ本来の処理を行わせる感じなのかなと。
https://excel-ubara.com/vba_class/VBA_CLASS_06.h …
この辺の理解が必要になるかもですね。
一読されてみては?
どれだけ難しさがあるのか感じられるかもですよ。
その辺については上位?のVisualBasicやC#等の出番になるかなと推測ですが思います。
時計を別のアプリで表示させつつExcelを操作するって事でしょうか。
No.1
- 回答日時:
VBAを使用して、ユーザーフォームに日付を表示する方法はいくつかありますが、以下のような方法があります。
ラベルコントロールを使用する方法
まず、フォームデザイナーでラベルコントロールをフォームに追加します。ラベルをダブルクリックして、ラベルのクリックイベントを開きます。次に、以下のコードを入力して、ラベルに現在の日付を表示します。
Private Sub Label1_Click()
Label1.Caption = Date
End Sub
テキストボックスコントロールを使用する方法
フォームデザイナーでテキストボックスコントロールを追加します。テキストボックスをダブルクリックして、テキストボックスのクリックイベントを開きます。以下のコードを入力して、テキストボックスに現在の日付を表示します。
Private Sub TextBox1_Click()
TextBox1.Value = Date
End Sub
実行したあとでも日付が変わるようなプログラムを作成するには、タイマーを使用することができます。以下は、1秒ごとに日付を更新する例です。
フォームにタイマーコントロールを追加します。
タイマーのIntervalプロパティを1000に設定します。これは、1秒ごとにタイマーイベントを発生させることを意味します。
フォームのタイマーイベントを開き、以下のコードを入力します。
Private Sub Timer1_Timer()
Label1.Caption = Date
End Sub
これで、フォームが開いたときから1秒ごとに日付が更新されます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ユーザーフォームのラベルに日付を表示させる方法があればお願いします。出来ればコード書いていただけると
Visual Basic(VBA)
-
エクセルVBA ユーザーフォームのTextBoxを日付にしたい
Excel(エクセル)
-
EXCEL・VBAフォームの日付(表示形式を変更したい)
Excel(エクセル)
-
-
4
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
5
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
6
VBA フォームのテキストボックスにセルの値を表示させたいが改行していたら改行もあわせて表示させたい
Excel(エクセル)
-
7
UserForm1.Showでエラーになります。
工学
-
8
ExcelVBAのユーザーフォームで一度保存したデータを同じフォームに呼び出して編集する方法
Visual Basic(VBA)
-
9
ユーザーフォーム上に現在日時と時刻を表示させていますがフォームを実行すると時間が更新されません。それ
Visual Basic(VBA)
-
10
VBAフォームのテキストボックスに初期値を表示するには?
Access(アクセス)
-
11
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
12
フォームテキストボックスの表示設定
Excel(エクセル)
-
13
Excelにて、ユーザーフォームで、日付けの範囲を指定し、検索しデーターを抽出し 別シートへ転記した
Excel(エクセル)
-
14
エクセルVBAのフォームで日時を入力しやすくしたい
Excel(エクセル)
-
15
ExcelVBAのユーザーフォームの中に線を引きたい
Visual Basic(VBA)
-
16
エクセルVBA ユーザーフォームのtextboxの書式設定って?
Excel(エクセル)
-
17
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
18
テキストボックスにカレンダー表示して入力方法
Visual Basic(VBA)
-
19
テキストボックスのvalueとtextの違い
Visual Basic(VBA)
-
20
ユーザーフォームのテキストボックスに前回入力した値を表示する Excel
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Enabled=Falseのテキストボック...
-
エクセルの画像にツールチップ...
-
ADOのCursorLocationプロパティ
-
Access 標題について
-
checkbox付きListViewで デフ...
-
C# アプリ終了時に設定を記憶...
-
コンボボックスの高さを変更し...
-
Wordテキストコントロールが未...
-
MSFlexGrid
-
テキストボックス(VBA)でEnter...
-
チェックボックスの文字色の変え方
-
ExcelテキストボックスのTab順...
-
カスタムコントロールInputMan...
-
VB2005 コードでのコントロー...
-
リストコントロールのデータの...
-
エクセル VBA ユーザーフォーム...
-
VC++のコンボボックスの各項目...
-
マウスオーバーした範囲の文字...
-
ラベルの表示
-
ListViewでのリスト表示(初歩...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストボックス(VBA)でEnter...
-
Wordテキストコントロールが未...
-
ユーザーフォームに日付を表示...
-
エクセルの画像にツールチップ...
-
C# TEXTが空白であるLABELは何...
-
VBからエクセルのテキストボ...
-
DataGridViewで行の展開みたい...
-
エクセル VBA ユーザーフォーム...
-
MSFlexGrid
-
コンボボックスの高さを変更し...
-
VB.NETで縦書表示をしたいので...
-
デザインモードを解除すると消...
-
Enabled=Falseのテキストボック...
-
ADOのCursorLocationプロパティ
-
PictureBoxの背景色変更(VB.NET)
-
VB6でLabelの最前面にText Box...
-
エクセル入力規制リスト行数
-
C# アプリ終了時に設定を記憶...
-
ListViewでのリスト表示(初歩...
-
MFCでbitmapを背景にしてstatic...
おすすめ情報
フォームにタイマーコントロールを追加する方法が出来ません。やり方を教えていただけますか?すいませんが回答宜しくお願いします