ユーザーフォームを作り、サイズ変更、タイトル変更、フォントを変更する。 マクロ講座

ユーザーフォームを作る

マクロでユーザーフォームを作る Excel VBA

ここではユーザーフォームを作成し、ユーザーフォームのサイズを変更したり、フォームのタイトル文字列(キャプション)を変更したりします。またフォームのフォントの種類とサイズも変更します。

ユーザーフォームを作る

ExcelVBAマクロ 28回

マクロにユーザーフォームを組み込む

ユーザーフォームは、VBE(Visual Basic Editor)のフォームの挿入から作成します。
フォームが挿入されると、フォームにはUserForm1というオブジェクト名がVBEによって自動的に名付けられています。
ここでは Visual Basic Editor を起動し、ユーザーフォームを挿入して、ユーザーフォームを作成するまでの手順をご紹介します。
その中でユーザーフォームのサイズを変更したり、ユーザーフォームのタイトル(キャプション)を変更したり、そしてユーザーフォームのフォントの種類とサイズの変更もします。
(サンプルファイルは、こちらから マクロ28回サンプルデータ

Formを作るにはまずVBEを開く

はじめにVBE(Visual Basic Editor)を起動します。
開発タブのVisual Basicボタンをクリックするか、キーボードからショートカットキーでAlt + F11
を入力します。
ユーザーフォームを作る1
VBEが表示されたら、メニューから[挿入]→[ユーザーフォーム]を選択します。
ユーザーフォームを作る2
すると、UserForm1が作成され、いっしょにツールボックスも表示されます。
ユーザーフォームを作る3
ユーザーフォームは、ボタンからも追加できます。
ユーザーフォームを作る3

フォームのサイズ変更

ユーザーフォームは、マウスで角をドラッグすると、大きくしたり、小さくしたり自在にサイズが変更できます。
ユーザーフォームを作る4
プロパティウィンドウから値を直接入力して、フォームのサイズを変更することもできます。
幅は、Widthプロパティで指定します。 ユーザーフォームを作る4
高さのプロパティはHeightから設定します。 ユーザーフォームを作る4
ユーザーフォームを読み込んだときに大きさを設定する場合は、UserForm_Initializeで、以下のようにコードでサイズを指定することもできます。
Private Sub UserForm_Initialize()
    With UserForm1
        .Height = 180
        .Width = 240
    End With
End Sub

フォームのキャプション変更(表示名・タイトル)

フォーム表示されているUserForm1というキャプション(表示名)は、プロパティウィンドウから変更できます
フォームのキャプション変更1
Captionの入力欄をクリックして「フォームをつくる」という表示名に変更しました。
フォームのキャプション変更2

ユーザーフォームのフォントの種類とサイズを変更

続いてその下にあるFontという項目からフォントの種類とサイズを変更しましょう。
ユーザーフォームを作る6
クリックするとフォントダイアログが表示されるので、フォントの種類やスタイル、サイズを変更することができます。
ユーザーフォームを作る6