コントロールの追加（コマンドボタン）

最終更新日：2013-02-18

第3回.コントロールの追加（コマンドボタン）

何もないフォームでは何もできませんので、

とりあえず、部品を配置しましょう。

この部品をコントロールと呼びます。

使えるコントロールは、

このツールボックスにあるアイコンが使えるコントロールになります。

ここには、他のコントロールを追加する事もできますが、それは後々。

　これは、配置されているコントロールを選択する場合に使います。

マウスをアイコンの上に置くと、ポップアップのメッセージが表示されますので、

それぞれのアイコンの意味は分かるようになっています。

では、まずはコマンドボタンを配置してみましょう。

アイコンは、

これです。

これをクリックして、フォーム上でドラッグしてサイズを決定します。

こんな感じです。

このボタンは、フォームを閉じるボタンにします。

プロパティで、オブジェクト名とCaptionを変更しましょう。

オブジェクト名：btnCancel
Caption：閉じる

このように指定します。

すると、

このように、ボタンの名称も変更されます。

次は、このボタンをダブルクリックするか、

右クリックで、「コードの表示」

このように、そのボタンのイベントが自動で追加されます。

ただし、追加されるイベントは、コントロールの種類によって、

デフォルトのイベントが追加されますので、適宜変更が必要になる場合があります。

ボタンの場合は、Clickイベントが追加されます、まあ、ボタンならほとんどこれで良いですね。

では、このイベントを以下のように書き換えます。


  
    
      Private Sub btnCancel_Click()

      　　Unload Me

End Sub

これで、閉じるボタンの完成です。

Unload Meは、
Unload frmSample

のように、フォーム名を書いても良く、ネットでは良く見かけますが、

フォーム毎に、いちいち変更するのも面倒ですし、

ここは、Meとして自分自信を閉じると明示しておいた方が良いでしょう。

では、前回作った、


  
    
      Private Sub btnCancel_Click()

      　　Unload Me

End Sub

これを実行してみましょう。

「閉じる」をクリックして、フォームが閉じる事を確認して下さい。

同じテーマ「Excelユーザーフォーム入門」の記事

ユーザーフォームを挿入

とにかく、まずは、ユーザーフォームの挿入です。するとこのようになります。これがユーザーフォームです。サイズはドラッグで変更できます。「ツールボックス」は、このフォームに配置する部品が並んでいるものですので、次回以降に、徐々に説明していきます。

フォームのプロパティ

プロパティはたくさんありますね。これ全部理解するのは大変です、いずれは、全て理解するに越したことはないですが、とりあえず、必要最低限のプロパティだけは把握しておきましょう。プロパティ説明 ActiveControl コンテナコントロール上のアクティブコントロールを取得または設定します。

コントロールの追加（コマンドボタン）
コントロールの位置・サイズ調整

とりあえず、OKボタンを追加しましょう。「閉じる」ボタンも移動させましょう。ツールボックスが非表示になっている場合は、「表示」→「ツールボックス」で表示させて下さい。コマンドボタンを追加して、オブジェクト名：btnOk Caption：OK として下さい。

ラベルの追加

固定文字を表示するものが、ラベルです。では、ラベルを追加します。３個程追加してみましょう。最初に配置する時は、適当な位置・サイズでよいです。前回の、第4回.コントロールの位置・サイズ調整後でまとめて指定すれば良いでしょう。

テキストボックス(TextBox)の追加

前回は、ここまででした。では、テキストボックスを追加しましょう。オブジェクト名は、プリフィックスにtxtを付けて名前はラベルと合わせます。つまり、txtコード txt漢字名称 txtカナ名称となります。

テキストボックス(TextBox)の値をセルへ

前回までに作成したのが、これでした。「OK」ボタンを押下すると、このテキストボックスに入力した値を、シートのセルに値を設定するようにします。まずは、そのシートを用意します。とりあえず、こんな感じで良いでしょう。

セルの値をテキストボックスへ

今回は、シートの実行ボタンを押下したら、アクティブセルの行の値をフォームに表示してみましょう。フォームのコードを表示しましょう。右クリックします。フォーム上で右クリックでも良いです。また、「表示」→「コード」…ショートカットはF7です。

標準モジュールとフォーム間のデータ受け渡しⅠ

今回はフォームが起動された時起動したシートのアクティブセルの行数を知る方法について解説します。前回までに作成したものは標準モジュールにSubFormShow() frmSample.Show EndSub フォームモジュールにPrivateSubUserForm_Initialize() DimiAsLong WithWorksheets(_顧客マスタ_…

標準モジュールとフォーム間のデータ受け渡しⅡ

１．シートのセルを使う２．標準モジュールのグローバル変数を使う３．標準モジュールからフォームのコントロールを操作する４．Subプロシージャーの引数を使う５．Functionプロシージャーの戻り値を使う。２．３．を解説しました。では、いよいよ４．５．を解説しましょう。

コンボボックス(ComboBox)の追加

ユーザーフォームで良く使われるコントロールは、ラベル、テキストボックスこれは当然ですが、その次に良く使われるものは、コンボボックス、リストボックス、チェックボックス、オプションボタンになるでしょう。今回から、この３つのコントロールの使い方の解説をします。