Microsoft Access Club > Access一日一見 >このページ >次頁 <前項  サイト内検索


Windows画面の分割表示 - Microsoft Shell Controls And Automation



マルチタスク機能として、複数画面を立ち上げて作業する場合が多くなってきています。メモリーも大容量になってきてますしね・・・。クリック一つで、自動的に分割画面に切り替わる方法を、今回ご紹介します。 Microsoft Shell Controls And Automation ライブラリ の 利用です。

参照設定

Microsoft Shell Controls And Automation ライブラリは外部ライブラリーのため、下記のようにVBE画面から 参照設定 で利用可能な状態に 設定します。

・参照設定ライブラリ設定

サンプルプロシージャの作成

何れでも利用できるようにFunctionプロシージャを作成します。

'外部のフォルダー内コンテンツ一覧を表示します。
'参照設定で「Microsoft Shell Controls And Automation」にチェックを入れて下さい。

Function Folder_Open()

    Dim objsample As Shell
    Set objsample = New Shell
    
    objsample.TileVertically 'Windows画面が分割表示されます。
    Set objsample = Nothing '開放します。

End Function
実行結果

プロシージャをイミディエイトウィンドウで実行すると、下記のように分割表示されます。
#サンプルは、WindowsXPです。4種類のウィンドウが立ち上がっているものとしています。
なお、10種類であれば10分割されます。

この状態から各コントロールを操作することが可能です。

2003/09/08 

ページの先頭へ 前ページへ戻る


Windows画面の分割表示 - Microsoft Shell Controls And Automation


-Microsoft Access Club-

注目のモンスター専用サーバーからお買い得プランまで幅広くそろえています。cPanel、PLESK、WEBMINまでお任せ下さい。
注目のモンスター専用サーバーからお買い得プランまで幅広い。
cPanel、PLESK、WEBMINまでお任せ下さい。