VBAのIE制御

Resizableプロパティは、ウィンドウサイズ変更の可否を設定します。

目次

• Resizableプロパティとは
• IE(InternetExplorer)のサイズ変更を可否するサンプルコード
  • 実行結果
  • 解説
• 利用されているコンテンツ
• InternetExplorerオブジェクトのプロパティ

Resizableプロパティとは

IEオブジェクトのResizableプロパティはIE(InternetExplorer)のウィンドウサイズ変更の可否を設定できます。設定する場合は、ブーリアン型(Boolean)の値を使用します。

引数Boolean

IE(InternetExplorer)のサイズ変更を可否するサンプルコード

Sub sample()

  Dim objIE As InternetExplorer

  'IE(InternetExplorer)のオブジェクトを作成する
  Set objIE = CreateObject("InternetExplorer.Application")

  'IE(InternetExplorer)を表示する
  objIE.Visible = True

　'IE(InternetExplorer)のウィンドウサイズ変更を禁止する
　objIE.Resizable = False

  MsgBox "現在「Resizable=True」で設定されています。「OK」を押下すると「False」に設定されウィンドウサイズ変更が可能になります。"

　'IE(InternetExplorer)のウィンドウサイズ変更を許可する
　objIE.Resizable = True

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。

実行結果

①IEのウィンドウサイズ変更を禁止します。
②メッセージボックスが表示され、「OK」を押下します。
③Resizableプロパティが「True」に設定され、IEのウィンドウサイズ変更を許可します。

解説

Sub sample()
　Dim objIE As InternetExplorer

※ドラッグ(スワイプ)すると全体を確認できます。

sampleのSubステートメントは引数の設定なしです。次に、Dimステートメントを利用して変数objIEをInternetExplorer型で宣言します。

'IE(InternetExplorer)のオブジェクトを作成する
Set objIE = CreateObject("InternetExplorer.Application")

※ドラッグ(スワイプ)すると全体を確認できます。

SetステートメントとCreateObject関数を利用してIEのオブジェクトを作成します。オブジェクト作成によりプロパティやメソッドを利用することができます。

'IE(InternetExplorer)を表示する
objIE.Visible = True

※ドラッグ(スワイプ)すると全体を確認できます。

VisibleプロパティにTrueを設定することで、ブラウザを表示させます。

'IE(InternetExplorer)のウィンドウサイズ変更を禁止する
objIE.Resizable = False

※ドラッグ(スワイプ)すると全体を確認できます。

こちらは、ResizableプロパティにFalseを設定していますので、、ウィンドウサイズ変更を禁止しています。

MsgBox "現在「Resizable=True」で設定されています。「OK」を押下すると「False」に設定されウィンドウサイズ変更が可能になります。"

※ドラッグ(スワイプ)すると全体を確認できます。

こちらは、MSgBox関数を利用してメッセージボックスが表示されます。「OK」を押下すると次の処理へ移ります。

'IE(InternetExplorer)のウィンドウサイズ変更を許可する
objIE.Resizable = True

※ドラッグ(スワイプ)すると全体を確認できます。

こちらは、ResizableプロパティにTrueを設定することで、ウィンドウサイズ変更を許可に変更しています。

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。

最後はEndステートメントを利用してsampleプロシージャを終了させます。

利用されているコンテンツ

Resizableプロパティは、あまり利用しませんが覚えておきましょう。

• 現在、利用されているコンテンツはありません。

InternetExplorerオブジェクトのプロパティ