![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
教えてください。
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)
-
VBA コンボボックスとテキストボックスを連結させたい
Visual Basic(VBA)
-
【Excel VBA】コンボボックスで選択した値の取得
Excel(エクセル)
-
-
4
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
5
コンボボックス内の文字サイズ変更
Excel(エクセル)
-
6
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
7
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
8
エクセルVBA ユーザーフォーム 複数のコンボボックス 同一リスト
Excel(エクセル)
-
9
ExcelVBAでテキストボックスの表示形式を小数点第二位まで表示する方法
Visual Basic(VBA)
-
10
ExcelVBA コンボボックスに入力があったらリンクしてテキストボックスを更新したい
Access(アクセス)
-
11
任意で選択したセルをテキストボックスに表示
Excel(エクセル)
-
12
Excel VBA 複数選択したリストボックスからテキストボックスに転記したいです。
Visual Basic(VBA)
-
13
Excel VBAのリストボックスの値を他のフォームに反映させる方法を教えてください。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで改行の入ったデータの正規...
-
flash ブラウザのサイズに合わ...
-
テキストファイルから読み込ん...
-
photoshopで書いた四角の枠の中...
-
【VB.NET】別Formのボタンが押...
-
python ボタンを押すと複数の関...
-
テキストボックスの中身をリセ...
-
ランダムに4桁の数字を表示する...
-
OpenGLのグラデーションについて
-
五芒星は、悪魔崇拝とどういう...
-
変数に256文字以上のテキストを...
-
C# chart controlの透過について
-
2つのテキストファイルを比べて...
-
四乗根を英語で言うと・・・
-
指定したURLを開くアクショ...
-
'2465'指定した式で参照してい...
-
CreateDialogについて
-
UWSCのBTN関数について。
-
ダブルクリックと2回クリックの...
-
シンボル化解除の方法
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで改行の入ったデータの正規...
-
テキストファイルから読み込ん...
-
VBAユーザーホームテキストボッ...
-
縦横比率のを変えずに画像のサ...
-
外部SWFファイルを再生バーでコ...
-
ラッコって?
-
複数ボタンの生成 - actionscript
-
ActonScriptでムービークリップ...
-
コンプトン散乱について
-
addChildで描画した絵(シンボル...
-
upc 7915と mc7915ctは互換性有...
-
ActionScript3のMovieClipについて
-
AS3 mc0~5をまとめて処理する
-
AS3.0 設置した画像を次のラベ...
-
2つの取り込んだ画像を交差さ...
-
flash as3 ムービークリップの...
-
Flashで外部jpgファイルをmcに...
-
3つのムービークリップ再生・巻...
-
日本ヒューレット・パッカード...
-
四角形の端っこをドラッグした...
おすすめ情報