ExcelのAにS001という値を入力し、Bに1という値があった場合、
その商品は登録済という仮定にし、
バーコードリーダーで読み取った値がS001だった場合、登録済というポップアップをだすようチェック機能を作成したいです。
※私は、phpやjavascriptは経験ありますがマクロを使用したことがありません。
知恵袋で似た案件がありました。
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address <> "$A$1" Then Exit Sub '変更されたセルがA1でなければ終わり Dim rng As Range Set rng = Sheets("Sheet2").Range("A:A").Find(Range("A1").Value, LookIn:=xlValues, LookAt:=xlWhole) 'A1の値をSheet2のA列で探す If rng Is Nothing Then '無かったら MsgBox "ありません" Range("A1").Value = "" '値を消す(必要なら) Range("A1").Select 'A1選択(必要なら) Else MsgBox "登録済" End If End Sub
これで解決に近いのですが、バーコードを読み取ったあと、エンターキーを押さないと
ポップアップが出ません。
バーコードを読み取った時点でポップアップが出るようにするにはどうしたらよいでしょうか?
バーコードリーダー名:BEVA
付属の説明書は添付画のように、テスト用バーコードのみです。
バーコードリーダーをExcelに組み合わせるのは初めてですか? マクロと言うかVBAを駆使してイベントの取り回しをしないと実現しづらい気がします。
ご回答ありがとうございます。はい、初めてです。VBAもあまり経験がありません。
バーコードリーダーの機種名も質問に追加した方がよさげですね。
イメージはちょっと潰れてて見えないですね。何枚かに分けるなどして内容が識別できるようにして下さい。
すいませんでした。スキャンし何枚かアップしました。
設定用のバーコードですね。これで全てですか?PREFIX,SUFFIX,terminator(ターミネーター )とか無いですか?取り敢えず全て、アップした方がいいですね。
回答3件
あなたの回答
tips
プレビュー