いつもお世話になります
私は時間が掛かるプログラムの実行に際し、途中途中にUserFormで経過を出力していますが時々前面に出ずに裏で止まっている時が有ります
前面に出すコードはWebからコピーしています
Option Explicit
'...常にフォームを最前面に表示するための宣言(HPよりコピー)
Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const HWND_TOPMOST As Long = -1
Private Const SWP_NOSIZE As Long = &H1&
Private Const SWP_NOMOVE As Long = &H2&
Sub UserForm_activate()
'...常にフォームを最前面に表示するための宣言(HPよりコピー)
Call SetWindowPos(GetForegroundWindow, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
Me.StartUpPosition = 1
UserForm52.Top = 200
UserForm52.Left = 600
DoEvents
Sleep 5000
Unload Me
End Sub
そんな経験はないですか?
もしあったら教えてください、その対処法を
以上、よろしくお願いいたします
No.3
- 回答日時:
_NET TIPS ウィンドウを常に最前面に表示するには? - Windowsフォーム - @IT
https://atmarkit.itmedia.co.jp/fdotnet/dotnettip …
再度、ご回答いただきありがとうございます
TopMost、勉強になりました
残念ながらVbaのプロパティには有りませんでしたが
これの意味が分かっただけども助かります
これからもよろしくお願いします
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) vba Sleep関数について教えてください 1 2023/01/18 10:18
- Visual Basic(VBA) Vba LongPtrについて教えてください 2 2022/08/19 11:14
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) VBAで質問ですが、皆さんはどの様に導き出しているのでしょうか? 6 2022/05/03 21:53
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) VBA処理追加 こちらでご教示頂いたのですが回答完了させてしまいましたのでこちらからまた質問させてく 2 2022/10/27 09:57
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Excel(エクセル) excel vba 参照渡しと値渡し 2 2022/04/27 10:45
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
-
VBA、UserFormを前面に出力してから処理後にももう一度前面に出したい
Visual Basic(VBA)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
-
4
エクセルVBAでUserFormを起動した時
Excel(エクセル)
-
5
VBAでユーザーフォームの表示を確認
Visual Basic(VBA)
-
6
ExcelVBAでフォーム内でブックを開くとフォームが隠れてしまう
Visual Basic(VBA)
-
7
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
8
UserForm1.Showでエラーになります。
工学
-
9
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
10
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
11
[VBA] UserForm を Excel の Window の前面に表示させない方法
その他(プログラミング・Web制作)
-
12
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
13
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
14
指定のWORKBOOKを前面表示する方法(エクセル:VBA)
Excel(エクセル)
-
15
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
16
エクセルVBAで、MsgBox やInputBox は、画面の中央以外に表示させたい。
Excel(エクセル)
-
17
ExcelVBAで今開いているユーザ情報を取得できますか?
Visual Basic(VBA)
-
18
モーダルフォームとモードレスフォーム
Visual Basic(VBA)
-
19
エクセルで別ブックをバックグラウンドでオープンする方法
Excel(エクセル)
-
20
Excel VBA:フォーム←→セルのアクティブ切り替え
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「しておきます」は偉そう?
-
Access 同じデータをたくさん...
-
USBコピーしたら 履歴残る?
-
エクセルで作った表をイラスト...
-
DVDのコピーガードがかかってい...
-
送られて来たURLが黒字になっ...
-
Word文書のコメントを含めない...
-
PDFファイルをメールにコピーす...
-
エクセルでデータが入力されて...
-
CDからUSBに音楽をコピーしたい
-
REGZAで録画した番組をパソコン...
-
ヤマダ電気にその場でコピーす...
-
履歴が残らないようにパソコン...
-
YouTubeで 時間指定 url できな...
-
PCからUSBにデータ保存し...
-
URLの貼り付け方法
-
JWB32の使い方(CAD関係です)
-
CTRL+Cでコピーが出来なくなった。
-
1:500(a3)の図面を1:200(a2...
-
mailtoを取り除く
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「しておきます」は偉そう?
-
DVDのコピーガードがかかってい...
-
Access 同じデータをたくさん...
-
エクセルで作った表をイラスト...
-
YouTubeで 時間指定 url できな...
-
Bufferの大きさ
-
USBコピーしたら 履歴残る?
-
送られて来たURLが黒字になっ...
-
REGZAで録画した番組をパソコン...
-
URLの貼り付け方法
-
コピー防止(CCCD)であるCDの...
-
CDからUSBに音楽をコピーしたい
-
SSDからSSDにOS以外のものをデ...
-
写しとはコピーをとることですか?
-
コピーと送るの違い
-
Word文書のコメントを含めない...
-
履歴が残らないようにパソコン...
-
Youtubeのコメントをコピーする...
-
【大至急】SDからSDへのコピー...
-
ファミマでキャッシュカードの...
おすすめ情報
早速のご回答ありがとうございます
すみませんもう少し具体的に教えてください
よろしくお願い申し上げます