ray88’s diary

お仕事で困ったとき用の自分用の覚書

Docmdオブジェクト ウィンドウの表示方法を指定する

■Maximizeメソッド アクティブウィンドウを最大化して表示する

■Minimizeメソッド アクティブウィンドウを最小化して表示する

■Renameメソッド  アクティブウィンドウを元のサイズで表示する

【書式】

Docmd.Maximize
Docmd.Minimize
Docmd.Restore

(例)

Sub Test4()
    DoCmd.SelectObject acTable, "T社員名簿"
    DoCmd.Minimize
    MsgBox "ウィンドウが最小表示されました"
    
    DoCmd.SelectObject acTable, "T社員名簿"
    DoCmd.Maximize
    MsgBox "ウィンドウが最大表示されました"
    
    DoCmd.SelectObject acTable, "T社員名簿"
    DoCmd.Restore
    MsgBox "ウィンドウが元のサイズに戻りました"
End Sub