![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
教えてください。
excel VBAで商品管理ソフトを作成しました。一連の流れは完成しましたが、やはりマクロの不慮の改変等が気になるので、ユーザーホームの作成も始めました。
早速の壁が、バーコードリーダーを用いて入庫作業をしますが、メインテキストボックスに入力したら、目的のシートに値は入るものの、カーソルが消えて毎回選択をしないといけません。メインテキストボックスにカーソルが常に表示されるマクロを教えてほしいです。
ちなみに、
’メインテキストボックス TabIndex 1
Private Sub mc_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim Target As Range
If mc.Value = "" Then Exit Sub
Set Target = ThisWorkbook.Worksheets("sheet1").Cells(Rows.Count, 2).End(xlUp).Offset(1, 0)
Target.Value = mc
mc.Value = ""
End Sub
Private Sub dm_Change() ’ダミーテキストボックス TabIndex 2
mc.SetFocus
End Sub
Private Sub CommandButton1_Click()
Unload UserForm2
よろしくお願いいたします。
No.1ベストアンサー
- 回答日時:
>メインテキストボックスにカーソルが常に表示されるマクロを教えてほしいです。
仕様が良く分からないのですが 単純にセルに値を代入した後に
メインテキストボックスにカーソルを置く場合は
Private Sub mc_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim Target As Range
・
・
mc.Value = ""
Cancel = True
End Sub
値を残したければ
mc.Value = "" は不要です
また、他のイベントを発生させたい場合は
If mc.Value = "" Then Exit Sub で抜けるので
値を入れずに他のイベントトリガーを踏む必要があります
値を入れている場合でも他のコントロールイベントを実行したい場合は
工夫が必要かと思いまう
ご質問の趣旨を取り違いて 頓珍漢な回答でしたら忘れてください
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 空のシートに関数を入れたい 2 2021/12/03 15:08
- Visual Basic(VBA) EXCEL VBA シート貼り付け 3 2021/11/15 12:33
- Visual Basic(VBA) ワークシートチェンジ 1 2022/02/01 11:19
- Visual Basic(VBA) シート名をフォルダ名に変更 1 2021/12/01 15:59
- Visual Basic(VBA) シート名でファイル検索する 2 2021/11/30 17:05
- Visual Basic(VBA) サブフォルダ含むすべてのフォルダの Excel 検索 4 2021/12/13 09:33
- Word(ワード) word_VBA_フォームからダイアログそこからの復帰について 2 2021/12/13 23:44
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) EXCEL VBA シート比較し〇×判定 1 2021/11/19 11:49
このQ&Aを見た人はこんなQ&Aも見ています
-
賃貸で可能な古民家風レトロな部屋作りのコツ!改めて知る畳の高い機能性と魅力も紹介
畳の部屋を雰囲気のよい部屋に仕上げたい!賃貸住宅でもできる古民家風のレトロな部屋作りのコツを伺った。
-
VBAコンボボックスで選択した値をシートに転記したい
Visual Basic(VBA)
-
引数に数値、文字列の混在
Visual Basic(VBA)
-
ユーザーフォームに別シートからデータを反映させたい。
Visual Basic(VBA)
-
-
4
VBAに関して
Visual Basic(VBA)
-
5
Excel VBAでの数値の計算についておしえてください
Visual Basic(VBA)
-
6
ExcelVBAのFindFirstエラーについて
Visual Basic(VBA)
-
7
Excel VBA マクロ あるフォルダー内の複数のファイルを統合したいです
Visual Basic(VBA)
-
8
Excel VBA 文字列のセルを反映させたいです
Visual Basic(VBA)
-
9
Excel VBA 定義されたプロージャ名、関数名の取得
Visual Basic(VBA)
-
10
エクセル VBAでの転記の方法について
Visual Basic(VBA)
-
11
Excelの各シートを色ごとで分類して値転記するマクロの作り方を教えて下さい。
Visual Basic(VBA)
-
12
Excel 書式のクリア・値貼付けをしても書式が変わらない
Excel(エクセル)
-
13
Excel マクロについて
Visual Basic(VBA)
-
14
Googleシート「A1」でなくて「A001」にしたいのですが
Excel(エクセル)
-
15
エクセルで条件書式と数式の組み合わせはできる?
Excel(エクセル)
-
16
Excel VBAについて【図形を組み合わせて作成した、料金別納表示の削除の仕方】
Excel(エクセル)
-
17
excl2013 縦の表を横にVBAでする方法
Excel(エクセル)
-
18
月ごとに作成している日報ファイルを、VBAでコピーし日付ごとのシートにしたい
Visual Basic(VBA)
-
19
VBA エクセル で FIND でのエラーについて,教えてください。
Excel(エクセル)
-
20
Excel VBA ダブルクリックで入力 複数まとめる
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAユーザーホームテキストボッ...
-
VBAで改行の入ったデータの正規...
-
テキストボックスの中身をリセ...
-
VBScriptでMsgBoxのYesNoボック...
-
python ボタンを押すと複数の関...
-
C# chart controlの透過について
-
【VB.NET】別Formのボタンが押...
-
'2465'指定した式で参照してい...
-
FLASHで「かるた」を作りたいの...
-
C言語でのマウスを移動とマウス...
-
マウス自体の移動量の取得
-
プログラミング、アーキテクチ...
-
VBからPDFファイルの埋め込みテ...
-
別のアプリケーションのテキス...
-
static関数がmapファイルに載ら...
-
VBSでMid関数を使ったらエラー...
-
DelphiのRichEditでカーソル位...
-
全てのテキストボックスをセル...
-
【Photoshop】レイヤー効果の境...
-
VB.NET2005 DataGridViewでレコ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで改行の入ったデータの正規...
-
VBAユーザーホームテキストボッ...
-
テキストファイルから読み込ん...
-
Flashで外部jpgファイルをmcに...
-
FlashでドラッグしたMCをリセッ...
-
AS3 mc0~5をまとめて処理する
-
upc 7915と mc7915ctは互換性有...
-
ラッコって?
-
縦横比率のを変えずに画像のサ...
-
テキスト入力
-
ステージの背景画像のみ拡大縮...
-
eval関数を利用して複数の処理...
-
ランダムに mcを連続attachM...
-
外部SWFファイルを再生バーでコ...
-
四角形の端っこをドラッグした...
-
看護師です。体温表のマクロを...
-
as3 addchildで生成したMCにリ...
-
Flashからリンクする際のconfir...
-
以下のActionScriptをスッキリ...
-
Suzukaで一行ニュースティッカ...
おすすめ情報