![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
いつもお世話になります
ウェブで調べて下記のステートメントでフォームを常に最前面に出したいのですが
フォーム内でブックを開くと隠れてしまいます
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&
Private Sub UserForm_Activate()
Call SetWindowPos(GetForegroundWindow, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
いろいろ試しましたが、良く分かりません
何か良い方法が有るのでしょうか?
教えて頂かれば幸いです、よろしくお願いいたします
No.1ベストアンサー
- 回答日時:
こんにちは。
試してみた感じではよさそうですが、そのコードでひとつ抜けているのは、
UserForm を ShowModal をFalse にしておくことではないでしょうか?そうしないと、Workbook から離れないことになってしまうと思います。
なお、別の質問でApplication.Input の位置については、出来ないということで、Close されてしまったようですが、あれはSetWindowsHookEx を使えば可能だと思いますね。
ありがとうございます
そんなものがあるとは知りませんでした
別の質問の件についてもお答えを頂き感謝しています
ちょっと難しそうですがトライしてみます
また、よろしくお願いいたします
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Vba Userformを前面に出すについて 3 2022/04/15 12:29
- Visual Basic(VBA) Vba LongPtrについて教えてください 2 2022/08/19 11:14
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) VBAで質問ですが、皆さんはどの様に導き出しているのでしょうか? 6 2022/05/03 21:53
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る バッチからEXEの結果を受け取りたいのですが、 下記のバッ 1 2023/07/04 15:13
- Visual Basic(VBA) batからexeを実行し戻り値を受け取る EXEの実行内容の結果によって、戻り値を0か1かで返したい 1 2023/07/04 16:40
- Excel(エクセル) excel vba 参照渡しと値渡し 2 2022/04/27 10:45
- Visual Basic(VBA) VBA 別ブックからの転記の高速化について VBA 別ブックからの転記の高速化についてご教授下さい。 19 2022/07/26 13:07
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Vba Userformを前面に出すについて
Access(アクセス)
-
VBA、UserFormを前面に出力してから処理後にももう一度前面に出したい
Visual Basic(VBA)
-
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
-
4
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
-
5
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
6
エクセルVBAでフォームのListboxをスクロールするには?
その他(Microsoft Office)
-
7
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
8
[VBA] UserForm を Excel の Window の前面に表示させない方法
その他(プログラミング・Web制作)
-
9
マクロ実行時、ユーザーフォームにラベルのテキストが表示されません。
Access(アクセス)
-
10
VBAでユーザーフォームが自動的に消える
Visual Basic(VBA)
-
11
VBAでユーザーフォームの表示を確認
Visual Basic(VBA)
-
12
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
13
ExcelのVBAでフォームが表示されない
Excel(エクセル)
-
14
エクセルVBAでUserFormを起動した時
Excel(エクセル)
-
15
ブックをCloseまたはQuitで閉じると他のユーザーフォームが消えてしまう。
Excel(エクセル)
-
16
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
17
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
18
最小化ボタンで最小化したフォームを最小化から復帰するには?
Visual Basic(VBA)
-
19
ListBoxで改行したい
Visual Basic(VBA)
-
20
Excel VBAのフォーム_ラベルの縦位置
その他(パソコン・スマホ・電化製品)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
リストボックスの選択解除
-
C# マルチディスプレイにて、...
-
アクセスVBA フォームのス...
-
Access サブフォームでの複数行...
-
メッセージボックスの背景色
-
サブフォームの行ごとにコンボ...
-
リストボックスをクリックする...
-
ディスプレイ解像度より大きな...
-
サブフォームの新規レコードに...
-
アクセス・別フォームの新規レ...
-
C# 別なフォームへ値を渡す (...
-
accessで2つ以上のフォームを起...
-
VBプログラムの終了
-
子フォームから親フォームのオ...
-
Googleフォーム・複数人の申し...
-
ACCESS 表形式フォームで1レ...
-
csvに保存しているデータをURL...
-
Accessでサブフォームの合計を...
-
同一のフォームを複数開いて
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
VB.net(VB)で、フォームにExcel...
-
リストボックスの選択解除
-
Googleフォーム・複数人の申し...
-
サブフォームの新規レコードに...
-
Accessでフォームから別フォー...
-
accessで2つ以上のフォームを起...
-
サブフォームの行ごとにコンボ...
-
フォーム上の全てのコントロー...
-
アクセスVBA フォームのス...
-
VBA リストボックスをダブルク...
-
サブフォームのイベント取得
-
メッセージボックスの背景色
-
PDFフォームに本日の日付を自動...
-
VBAでフォームのスクロールバー...
-
Access 無操作の場合、自動で閉...
-
アクセス フォームが存在する...
-
VBプログラムの終了
-
メインフォームからサブフォー...
-
ユーザーフォーム上にアイコン...
おすすめ情報