エクセルVBAユーザーフォーム

質問

ユーザーフォームに入力後ワークシートへ転記されるのですが、そのカーソルがワークシート側に行ってしまいます。連続して入力したいのですが、ユーザーフォームにもどるようにするにはどうしたらよいのでしょうか？
教えて下さい。よろしくお願いいたします

回答No.2

GreatDragon · ベストアンサー

こんばんは。

こちらの質問の続きですね。
http://oshiete1.goo.ne.jp/kotaeru.php3?q=2056002

> ユーザーフォームに入力後ワークシートへ転記されるのですが、そのカーソルがワークシート側に行ってしまいます。
ユーザーフォームのコントロールの値を転記する際に、ワークシートやセルを選択していませんか？
転記だけの処理ならば、フォーカスはユーザーフォーム上にあります。
ワークシートやセルを選択しなくても転記は出来ますので、もし不要な選択があればその命令をコメントしてみて下さい。

もし上記が不可能な場合は、＃１の方のご回答の通りに命令を追記して下さい。

補足

GreatDragon 様　毎回ご回答ありがとうございます。
http://oshiete1.goo.ne.jp/kotaeru.php3?q=2056002の質問の続きです。おっしゃる通り選択しておりました。ですが、＃１のご回答を下さりやってみたところできました。
また、その続きなのですが、ユーザーフォーム上で入力数字の桁数を制限するにはどのようにすれば良いのでしょうか？ユーザーフォームを出していると入力規則が使えず難儀しております。
あつかましい質問で申し訳ありません。よろしければご回答下さいますようお願い申し上げます。

回答No.3

GreatDragon

こんばんは。

> ユーザーフォーム上で入力数字の桁数を制限するにはどのようにすれば良いのでしょうか？
テキストボックスのプロパティに、MaxLength プロパティがあります。
　・桁数を制限しない場合は 0 （既定値）を設定します。
　・例えば５桁に制限したければ 5 と設定します。

事前にプロパティウインドウで設定しておくか、あるいは Initialize イベントに命令を記述すると良いでしょう。

がんばってくださいネ。

お礼

GreatDragon　様
度々の質問にもかかわらず、丁寧に教えて下さいましてありがとうございました。とても勉強になりました。

回答No.1

tommy-pie83

たとえば
ユーザーフォーム1 の テキストボックス１にカーソルを置いておきたいときは

UserForm1.TextBox1.SetFocus

もしこの時 ユーザフォーム1が隠れて見えなくなっていたら
その前に
UserForm1.Show
を書き込んでください。

お礼

ありがとうございました。やりたかったことがばっちりできました。