ユーザーフォームのテキストボックスの入力可能文字を半角英数だけにする方法

テキストボックスコントロールプロパティテキストボックス

エクセル住所録などでデータ入力面倒って感じたことありませんか?

名前・住所などは全角ひらがな、フリガナは全角カタカナ、電話番号は半角英数だから、切り替えるのがめんどくさいって思いませんか?

オリジナル入力フォームのユーザーフォームを使えば、配置したテキストボックスごとにIMEモードを設定すれば解決しますよ!

ユーザーフォームについてはここでは省略しますので、使い方などは下記をご覧くださいませ。

スポンサーリンク

コントロールのプロパティで設定する

ユーザーフォーム上にテキストボックス(TextBox)を配置すると文字を入力できる枠ができ、何も設定しなくてもすぐに使えます。

文字入力後に普通に変換作業(半角英数やカタカナなど)ができます。

例えば、名前のフリガナを入力するテキストボックスには、最初からカタカナで表示されていれば変換の手間が省けますし、電話番号を入力するテキストボックスには最初から半角英数になっていれば、便利ですよね。

そこで、ユーザーフォームの文字の種類を指定したいテキストボックスを選んでプロパティで文字をあらかじめ指定しておきましょう。

listboxプロパティ

listboxプロパティ

  1. このテキストボックスのプロパティの表示方法は簡単です。文字の種類を指定したいテキストボックス(TextBox)をクリックします
  2. 左下に表示されるテキストボックスのプロパティが表示されます
  3. 中央付近にある【IME Mode】をクリック
  4. ▽が表示されるのでクリック
  5. 【0】~【8】の指定したい文字種類をクリックします
  6. これで、設定が完了します。
IMEモード

IMEモード

IMEモードの種類

種類(定数)入力文字(内容)
0-fmIMEModeNoControl入力モードを変更しない(既定値)
1-fmIMEModeOnIMEをオンにする
2-fmIMEModeOffIMEをオフにする(英語モードにする)
3-fmIMEModeDisableIMEを使えなくする(キーボード操作できない)
4-fmIMEModeHiraganaひらがなにする
5-fmIMEModeKatakana全角カタカナにする
6-fmIMEModeKatakanaHalf半角カタカナにする
7-fmIMEModeAlphaFull全角英数にする
8-fmIMEModeAlpha半角英数にする

このIMEモードは、ユーザーフォームに配置したテキストボックスひとつひとつそれぞれ個別に設定できるので、住所録などの入力フォームを作った時には設定しておくと、名前などを入力する時にいちいち変換しなくていいのでとても便利で、仕事などの作業効率が上がりました。

VBAコードを記述すれば、当然設定できますが毎回変更が無ければあらかじめプロパティを設定するだけで複雑なコードを書かなくて済むのでとっても便利ですよ!

スポンサーリンク

ユーザーフォームでオリジナルフォーム作ろう

エクセルの作業時間を短縮して効率よく作業を可能にする「ユーザーフォーム」を使いこなすには、基本を押さえておきましょう。

1日400人ぐらいの方が見ていただいている意外と人気ページなんです。

文字を入力するのに絶対使うTextBox

ユーザーフォームにテキストボックスを使わないで済むのは、確認画面ぐらいかな?

テキストボックスとセルをリンクさせる様々な方法を組み合わせれば、作業時間はあっという間に短縮できます。

文字列だけじゃない!Labelもクリックできるので可能性大

ラベルといえばテキストボックスの説明として文字列で表示させるのが、基本の使い方ですがクリックするとプログラムを実行させることもできるのです。

工夫次第でできることは無限大に広がります。

どんなVBAコードをコマンドボタンに記述しますか?

ボタンをクリックすると記述したプログラムが作動して、繰り返し作業や手間がかかったことが一瞬で完了させることができます。

あんなこともこんなこともできちゃいますよ。

波乗りアヒル
波乗りアヒル

ご覧いただきありがとうございます。

ブログランキングに登録しています。

少しでもお役に立てれば幸いで、参考になったようでしたら応援よろしくお願いします。


Microsoft Officeランキング

ユーザーフォームを使えばこんなに便利に早く作業が終わりますよ
波乗りアヒル
波乗りアヒル

エクセルの勉強お疲れ様です。ちょっとひと休みしませんか?

スポンサーリンク


テキストボックス
スポンサーリンク
参考になりましたらシェア宜しくお願い致します

山頂テラスデッキからの三段紅葉(2019年11月)

フリーパスって助成金つぎ込んでいいの?

コロナ禍のGo To トラベル以外にも助成金だらけでうらやましいね。

安くなったフリーパスで遊びに行きたいけど、給与も減って余裕ないよね。

Excel VBA