No.1ベストアンサー
- 回答日時:
「autoexec」という名前のマクロを作成して下さい。
(必ずこの名前である必要があります)
そのマクロで、「アクション」に「最大化」を指定して保存すれば、起動時に内側ウィンドウが最大化されます。
また、「アクション」に「コマンドの実行」を指定して、画面左下の「コマンド」欄に「最大化 (アプリケーション)」を設定すれば、外側ウィンドウが最大化されます。
「マクロ名」列(デフォルト設定では非表示)に何も入力しない限り、これらや他のアクションを連続して行うこともできます。
No.3
- 回答日時:
>外側
これは、アプリケーション自体を大きくって事ですか?
それであれば、VBAです。
起動時に表示を設定しているフォームの「読み込み時」にイベントプロシージャを指定し、以下のコードを利用することで、フォームだけではなく、アプリケーションも最大化することができます。
Option Compare Database
Option Explicit
Private Declare Function ShowWindowAsync Lib "user32.dll" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function GetParent Lib "user32" (ByVal hWnd As Long) As Long
'読み込み時イベント
Private Sub Form_Load()
Dim lngWnd_Form As Long
Dim lngWnd_App As Long
'フォームのハンドル
lngWnd_Form = Me.hWnd
'アプリケーションのハンドル
lngWnd_App = 関数_最高の親取得(lngWnd_Form)
'アプリケーションを最大化
Call 関数_最大化(lngWnd_App)
'フォームの最大化(ここはDoCmd.Maximizeでもいい)
Call 関数_最大化(lngWnd_Form)
End Sub
Private Sub 関数_最大化(ByVal inWnd As Long)
Const SW_SHOWMAXIMIZED = 3
Call ShowWindowAsync(inWnd, SW_SHOWMAXIMIZED)
End Sub
Private Function 関数_最高の親取得(ByVal inWnd As Long) As Long
Dim lngWnd As Long
Dim lngParent As Long
lngWnd = inWnd
Do
lngParent = GetParent(lngWnd)
If lngParent = 0 Then
Exit Do
End If
lngWnd = lngParent
Loop
関数_最高の親取得 = lngWnd
End Function
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 起動中のアプリ、ソフトの取得 3 2022/12/28 11:13
- JavaScript [Java] Edgeでのアドレスバー非表示について 3 2022/04/20 17:51
- オンラインゲーム pc版fall guysでプロコンが反応しなくなりました。windowsです。プロコンをusb接続す 1 2023/02/14 17:33
- Windows 10 拡大鏡の音声読み上げ機能が機能しません 2 2023/02/23 22:34
- Visual Basic(VBA) Vba LongPtrについて教えてください 2 2022/08/19 11:14
- その他(ソフトウェア) Figma 1 2023/06/23 14:22
- Windows 10 2つのウィンドウ選択時の表示について 10 2023/07/25 08:48
- Outlook(アウトルック) outlook メモリ不足 1 2022/05/31 10:16
- Excel(エクセル) WPSスプレッドシートの起動オプションの設定は可能ですか? 1 2023/02/11 19:49
- その他(プログラミング・Web制作) pythonで、tkinterとpillowの組み合わせ 2 2022/08/16 17:42
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
AccessのFormの設定で、開いた時に必ず最大化で表示する方法が分からず困っています
Access(アクセス)
-
access アプリケーションの最大化をしたい
Access(アクセス)
-
ACCESSでタイトルバーを非表示にする方法
Access(アクセス)
-
-
4
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
5
AccessからExcelのファイルを起動する
その他(データベース)
-
6
Access 2010フォームの全画面表示
Access(アクセス)
-
7
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
8
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
9
Access VBA を利用して、フォルダ内のファイルの名称を変更したい
Access(アクセス)
-
10
フォームウィンドウを最前面に表示したい(ACCESS)
Microsoft ASP
-
11
accessで重複を防ぎたい
Access(アクセス)
-
12
Access サブフォームでの選択行の取得
その他(データベース)
-
13
エクセルVBAでアクセスファイルを開く方法
Access(アクセス)
-
14
AccessからExcel最小化
その他(プログラミング・Web制作)
-
15
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
16
ACCESS フォームのサイズ調整
サーバー
-
17
Returnに対するGoSubがありません
Access(アクセス)
-
18
アクセス VBAについて FROM句の構文エラー
Access(アクセス)
-
19
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
20
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Windows10 エクスプローラー表...
-
Excelのウィンドウが少し小さく、ズ...
-
サクラエディタで、分割したウ...
-
AccessのFormの設定で、開いた...
-
新しいウィンドウで開くときウ...
-
Access 起動時、ウィンドウを...
-
ウィンドウの縮小拡大ができま...
-
VLCメディアプレイヤーでの拡大...
-
ウィンドウ閉じるボタンが隠れ...
-
画面のサイズを「元のサイズ」...
-
インターネットエクスプローラ...
-
Google Chromeのウィンドウサイ...
-
UWSC 非アクティブウィンドウ...
-
draftsight コマンドウィンドウ...
-
ウィンドウを自動で分割表示し...
-
IE 画面が下にずれてもどらない
-
Bookを開いた時にシート画面を...
-
windows edge が最大化できませ...
-
ウィンドウの一番下が見られない
-
Firefoxで、勝手にブラウザのウ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windows10 エクスプローラー表...
-
Excelのウィンドウが少し小さく、ズ...
-
VLCメディアプレイヤーでの拡大...
-
AccessのFormの設定で、開いた...
-
サクラエディタで、分割したウ...
-
ウィンドウの一番下が見られない
-
ウィンドウの縮小拡大ができま...
-
Access 起動時、ウィンドウを...
-
draftsight コマンドウィンドウ...
-
Google Chrome で画面が小さく...
-
UWSC 非アクティブウィンドウ...
-
入力した文字を電光掲示板のよ...
-
ウィンドウ閉じるボタンが隠れ...
-
インターネットエクスプローラ...
-
新しいウィンドウで開くときウ...
-
画面のサイズを「元のサイズ」...
-
VBAでIEを開いて最大化したい。
-
RealPlayerでの再生画像サイズ...
-
EXCELのウィンドウがタスクバー...
-
Firefoxで、勝手にブラウザのウ...
おすすめ情報