トップ > 逆引きで学ぶ ユーザーフォーム&コントロール > 1-10 フォームのサイズを変更する

1-10 フォームのサイズを変更するユーザーフォーム   2021.11.16

次の書籍の第1章~5章を公開しています。
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」

目次  前頁   次頁  索引

フォームのサイズを変更するには、3つの方法があります。

デザインモードでの設定

VBEのデザインモードでフォームを選択すると、フォームの輪郭にそって8つのポイント(■:5 □:3)が表示されます。
このポイントの中で白のポイント(□)をドラッグ&ドロップすると、サイズが変更されます。


プロパティウィンドウでの設定

プロパティウィンドウで値を直接入力して、フォームの高さを変更してみます。
高さのプロパティはHeightです。
次の図は、プロパティウィンドウのHeightプロパティの数値を変えた例です。
プロパティの値を変更すると高さが変わったことが確認できます。


プログラムでの設定

VBEでフォームオブジェクトをダブルクリックすると、オブジェクトのモジュールに切り替わります。
その画面に次のように記述します。


サンプルコード

【UserForm1】
Private Sub UserForm_Click()
    If Me.Height = 180 Then
        Me.Height = 230
    Else
        Me.Height = 180
    End If
End Sub

このコードは、ユーザーフォームの高さが180ポイントだったら、高さを230ポイントに変更。
高さが180ポイント以外だったら、高さを180ポイントにします。

ユーザーフォームを表示すると、クリックする毎にサイズが変化します。


書籍紹介140以上のサンプルファイル付き!

知りたいがすぐわかる! やりたいがすぐできる!
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」(Kindle版)
ユーザーフォームを扱えると、VBAでできることが大きく広がります!
本書では、知りたいこと、やりたいことから、逆引きで学びを深められます。

■ 購入:amazon

ページトップへ戻る
Copyright(C) 2009- 坂江 保 All Rights Reserved.