エクセルで様々な数値などのデータ入力を行う時に、オリジナルの入力画面でエクセルを操作できるってご存知でしたか?
この入力画面をユーザーフォームといい、ユーザーフォームを使う事によりデータ入力の作業時間を大幅に短縮してくれるので、ご紹介します。
エクセルの授業や専門学校に行っていないので、当初VBAとかプログラミングなどの単語を見ただけで、くじけそうになりましたがやってみると何とかなるもんですよ!
ユーザーフォームの作成方法
エクセルのユーザーフォームを作成するには、Visual Basic Editor(VBE)を開きますが方法は2つあります。
1つ目は[Alt]+[F11]キーを押して、Visual Basic Editor(VBE)を起動する 方法で、もう1つは
開発からVisual Basic Editor(VBE)を起動する方法です。
開発の表示方法
- エクセルワークシートの左上のOfficeボタンをクリックしてからExcelのオプションをクリック
- Excelのオプションが開いたら「開発タブをリボンに表示する」にチェックを入れる
Visual Basic Editor(VBE)を起動すると下記のような画面が表示されたら、【挿入】をクリックして次に【ユーザーフォーム】をクリックするとユーザーフォームが表示されます。

まだ何もパーツはありませんが、ユーザーフォームが無事作成できました。

ではこの「UserForm1」の名前などを変更しますので、【表示】をクリックして次に【プロパティウィンドウ】をクリックすると、「UserForm1」のプロパティが表示されます。

ユーザーフォームを挿入したら、好みの名前や書式に変更するプロパティウィンドウの設定をしましょう。

プロパティウィンドウ
プロパティウィンドウには、作成したフォームやフォーム上に作成したコマンドボタンなどの書式などのプロパティを設定できるようになっています。

ウィンドウの左側が名称、右側が値で、この値を変更すれば、設定が変更できます。
例としてCaption「UserForm1」を「商品登録」に書き換えると下の図のようになりました。

ユーザーフォームの動作チェックをしてみよう!
操作方法は、Visual Basic Editor(VBE)画面のボタンを押してみましょう。

当然ながら、まだ何も設定していないので、ワークシート上に商品登録のフォームが表示されるだけです。

表示されたユーザーフォームの右上の✖印をクリックで元の画面に戻ります。

ユーザーフォームの✖ボタンでフォーム自体閉じられないようにすることもできるんです!


ちなみに、ユーザーフォーム自体の大きさを変えるのは、通常の画像と同じように左クリックしながら引っ張れば、大きさを変えられます。もちろん、プロパティからも変更可能ですが、直感的に操作できるのは、先に書いた通りです。
それでは、次に商品登録ができるように、ツールボックスを使ってユーザーフォームを作ってみましょう。
ツールボックスを使う
ツールボックスとは、作成したユーザーフォームにコントロールという部品セットみたいなものです。


このコントロールには、文字や数字を入れる「テキストボックス」やユーザーフォームに文字列を表示する「ラベル」など使う目的に応じて種類があります。
コントロール名 | 機能 |
ラベル | 文字列の表示 |
テキストボックス | 文字列の入力 |
コンボボックス | 一覧から選択して文字列の入力 |
リストボックス | 一覧から項目選択 |
チェックボックス | 複数の項目から複数の項目を選択 |
オプションボタン | 複数の項目から1つの項目を選択 |
トグルボタン | オン・オフの切替 |
フレーム | コントロールのグループ化 |
コマンドボタン | ボタンクリックによるコマンド実行 |
タブストリップ | タブによりページ切替(同一コントロール) |
マルチページ | タブによりページ切替(ページ別複数コントロール) |
スクロールバー | スクロール操作で値の増減 |
スピンボタン | ボタンのクリック操作で値の増減 |
イメージ | 画像の表示 |
RefEdit | セルの範囲選択 |
では、先ほど作成した商品登録(UserForm1)に商品名を入力する枠を作りますが、この文字や数字を入力する枠の事を「テキストボックス」といいます。
ツールボックスのテキストボックスにマウスのカーソルを合わせると”テキストボックス”とコメントが表示されますので、クリックしてUserForm1の中に好きな大きさにドラッグ&ドロップするだけです。



コントロールを配置してみよう!
レイアウトは後で整えるので後回し!気にせず配置しよう


テキストボックスは3つ配置し、作成した順番にTextBox1、2、3となり、次にこのテキストボックスに文字を入れた時に、エクセルシートの任意のセルに入力する為に実行させるボタンを作ります。
このボタンの事をコマンドボタン(CommandButton)といいます。
コマンドボタンの作成もテキストボックス作成時と同様の方法で、ツールボックスからコマンドボタンを選ぶだけです。
これで、TextBox1、2、3に入力した文字や数字がCommandButton1を押すことによって、エクセルシートの任意のセルに入力するというユーザーフォームの最初の1歩ができました。



といってもまだ完成したわけではありません。まだ、何も指示命令(コード)を設定していないからです。
実際に前述した、Visual Basic Editor(VBE)画面の▶ボタンを押して、エクセルシートに表示された商品登録(UserForm1)のTextBox1、2、3に文字を入れて、CommandButton1を押してみても何も変化はないですね。(ボタンが押せたぐらいです)
コマンドボタンに(VBA)コードを書こう
TextBox1、2、3に入力した文字や数字を指定したシートのセルに記述する(転記)コードを書いてみます。
転記するシートは、Sheet1。セルはA1とすると、下記のようになります。
Private Sub CommandButton1_Click()
Worksheets(“sheet1”).Range(“A1”).Value = TextBox1.Value
Worksheets(“sheet1”).Range(“B1”).Value = TextBox2.Value
Worksheets(“sheet1”).Range(“C1”).Value = TextBox3.Value
End Sub
- コマンドボタン1がクリックされたら
- シート名(sheet1)のセルA1の値はテキストボックス1の値にする
- シート名(sheet1)のセルB1の値はテキストボックス2の値にする
- シート名(sheet1)のセルC1の値はテキストボックス3の値にする
- マクロ終了
これで、TextBox1に入力された文字や数字はSheet1のセルA1に、TextBox2に入力された文字や数字はSheet1のセルB1に、TextBox3に入力された文字や数字はSheet1のセルC1に、必ず転記されます。
では、Visual Basic Editor(VBE)画面の▶ボタンを押して、エクセルシートに表示された商品登録(UserForm1)のTextBox1、2、3に文字を入れて、CommandButton1を押すと、ワークシートにユーザーフォームを使って入力した文字や数字が、転記されましたね。


この方法でユーザーフォームを使ってセルの入力ができましたが、この方法だと何度入力しても同じセルに上書きされるだけなので実用性はありません。
そこで、コマンドボタンを押して入力が終わると、次の行に自動的に入力されてリストが作れるようにコードを追加すればできるようになりますが、ここでは省略します。
でもその前に、ユーザーフォームの見た目を無視して作ったので体裁が悪いので、テキストボックスを揃えたりコマンドボタンの名前を変えたりと体裁を整えましょう。
コントロールの大きさや位置を揃える方法
3つ作ったテキストボックスの大きさを揃える方法は、コントロールを複数まとめて選んでVisual Basic Editor(VBE)画面の「書式」➡「同じサイズに揃える」を選びます。
表示された「幅」「高さ」「両方向」の中から揃えたい大きさの項目を選べば、バラバラだったテキストボックスの大きさ・位置が綺麗に揃います。








コマンドボタンの名前を変更する
「CommandButton1」の名前を変える方法は簡単です。
Visual Basic Editor(VBE)画面左下にコントロールのプロパティがありますので、ここで変更します。
ユーザーフォームの中の「CommandButton1」をクリックすると、コントロールのプロパティが「UserForm1」から「CommandButton1」のプロパティに変わります。
正直英語でずらずら並んでいるので分かりずらいですが、アルファベット順にAから順番に上から並んでいます。
ここでは、「CommandButton1」を押すと商品名が登録できるようにユーザーフォームを作っているので、コマンドボタンの名前は「登録」が合っていますので、「CommandButton1」という表示を「登録に変更する設定をします。
「CommandButton1」のプロパティの(オブジェクト名)の行の6行目に「Caption」があり、右側に「CommandButton1」となっています。
ここの「CommandButton1」と書いてある文字を削除して「登録」に書き換えると、コマンドボタンの名前が変わります。


次はテキストボックスがユーザーフォーム上に並んでいるだけなので、テキストボックスのところに何の事柄を入れるのかわからないのでタイトルや見出しをつけましょう。
ユーザーフォームのラベルを配置する方法
ユーザーフォームのラベル(Label)とは、フォーム上に文字列を表示する為のコントロール(部品)です。
ラベルには直接文字入力などをするものではありませんが、フォーム上のお題(タイトル)や他のコントロールの説明書きなどに利用することが多いです。
先ほどのテキストボックスやコマンドボックスを作成した時と同じ方法で、ツールボックスからラベルを選びます。


配置方法は以下の通りです。
① ラベルを配置したいユーザーフォームを選ぶ
② ユーザーフォームをクリック
③ ツールボックスが表示される
④ ツールボックスからラベルをクリック
⑤ マウスのポインターの表示が変わる
⑥ ユーザーフォーム内のラベルを配置したい場所をクリック



これでユーザーフォーム上にラベルが配置されました。
この作業を繰り返せば、ラベルはユーザーフォーム上に複数配置可能です
関連記事
-
VLOOKUPをVBAラベルを活用してデータ検索・修正をする方法
【ラベル(Label)にVBAコードを記述する】 ボウリング成績表でも使っているユーザーフォームに配置した文字を表示するための「ラベル(Label)」にも、実はVBAコードを… -
VBAコマンドボタンにホームページURLを開く設定をする方法
ホームページのURLアドレスをユーザーフォームのコマンドボタンに登録して、クリックすると指定したホームページが別ウィンドウで開くようにしたいと思ったことありませ… -
エクセルVBAのユーザーフォーム表示位置を任意の場所に変更する方法
オリジナルの入力フォームを作ったのに、シート上の文字やセルの上に表示されているので位置を変えたいと思ったことありませんか? 初期設定の画面中央から好きな位置に… -
Excel-VBAタイマー機能で数秒後にユーザーフォームを表示させる方法
エクセルを使って成績などを入力して作成した成績表で、入力漏れがなかったかどうかなどをチェックするのに数秒間だけ指定したページや範囲を表示させたいと思ったこと… -
セル値を自動取得してオプションボタンの状態を表示させるVBA方法
ユーザーフォームに配置したオプションボタンって住所録の性別選択などで使用していると思いますが、セルの値が「男」「女」を自動的に見つけてオプションボタンの状態… -
全てのオプションボタンが未選択の時にエラーを防ぐVBA対処法
マクロを組み込んだエクセルを他のスタッフと共有して使っている時に、誤ってユーザーフォームに配置した「オプションボタン」を選択しないで次に進まれてしまい、意図… -
ユーザーフォームを開く時にラベルの名前を書き換えて表示する方法
ユーザーフォームに配置したラベル名「Label1」が、フォーム表示と同時に名前や日付などに自動的に表示を変えることができるのをご存知ですか? 方法は簡単で指定したセ… -
ユーザーフォームの✖ボタンでフォーム自体閉じられないようにする
苦労してExcel-VBAを組み込んだエクセルファイルを他人に渡して使ってもらうと、エラー表示になったと言われたことありませんか? 原因は簡単で、エクセル操作をオリジ… -
エクセルファイルを開くと自動的にユーザーフォームを表示する方法
オリジナルの入力フォームを表示させる方法に悩んだことありませんか? エクセルファイルを開いたら自動的にユーザーフォームが開くようになったら手間もなく便利なので…
紅葉スポット
-
養老渓谷紅葉ライトアップへ上総中野駅からバスで滞在時間3時間
懐かしい国鉄車両に乗車できるいすみ鉄道に乗って、昭和の風情が残る養老渓谷の温泉街で地元振興もかねて「養老渓谷もみじまつり」が行われ、ライトアップも行いながら… -
鬼怒川温泉駅からバスで川俣ダムと瀬戸合峡渡らっしゃい吊橋紅葉へ
【紅葉見頃】10月中旬~11月上旬 紅葉を見に日光を訪れて中禅寺湖周辺を目指して、大渋滞や混雑に巻き込まれて大変な思いをした方多いと思いますが、関東エリアの紅葉… -
けさかけ橋と小中大橋の狭い山道でバスも行けない秘境の紅葉名所へ
小さいの?大きいの?中くらいなの?って一瞬思ってしまう小中大滝(こなかおおたき)。 落差100mほどある滝で紅葉シーズンには鮮やかな絶景の中に水が落ちる景色を見る… -
土合駅から谷川岳ロープウェイで天神平スキー場からの天空紅葉絶景へ
谷川岳ロープウェイに乗って谷川岳天神平スキー場として冬は多くのスキーヤーに楽しまれていますが、夏は避暑地スポットとして気温22℃の涼しさを体感でき、さらに秋は一… -
中禅寺湖を上から見られる絶景ポイント半月山展望台へ滞在時間50分
【紅葉見頃】10月中旬~11月上旬 最近インターネットや雑誌などで日光を紹介する時によく見る機会がある、中禅寺湖を上から撮った写真の場所ってどこだろうって思いま… -
電車とバスのフリーきっぷで行ける10月見頃の紅葉スポットへ
見頃順人気順10月見頃11月見頃12月見頃 【関東エリアの人気紅葉スポット】 関東地方で紅葉名所といえばなんといっても日光ですが、紅葉シーズンになると平日でもいろは…