OfficeType

VBA~ユーザーフォームを閉じよう~Excel

ユーザーフォームを閉じたい時はUnloadステートメントで閉じます。

書き方

Unload オブジェクト名

ユーザーフォームのオブジェクト名を変更したい場合は作成したユーザーフォームをクリックするとプロパティウィンドウにオブジェクト名の項目があるので、新しい名前を入力すると変更されます。プロパティウィンドウが表示されていない場合はメニューの表示からプロパティウィンドウをクリックすると表示されます。

ユーザーフォームのボタンに閉じるを設定する

ユーザーフォームに追加したボタンをダブルクリックするとしたのようなコードが表示されます。

image-01

image-02

image-03

image-04

Public Sub CommandButton1_Click()

End Sub

このコードに閉じるを追加します。

Public Sub CommandButton1_Click()

Unload UserForm1

End Sub

下のコードを実行すると作成したユーザーフォームが開くので閉じるのボタンを押すとユーザーフォームが閉じます。

Sub test1()

UserForm1.Show

End Sub

image-05

image-06