97

view

こんにちは

『B列』のセル内容が変わったら
から
『A列』のセル内容が変わったら
に変わっていますが・・・

A列を入力⇒B列を入力したら
A列のデータから『VLOOKUP関数』で『帳簿在庫』シートから
『C列』にデータを表示させ、D列に『C列』から『B列』をマイナスした数値を表示・・・かな？

対象シートのシートモジュールに

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column <> 2 Or Target.Row < 3 Then Exit Sub

Target.Offset(, 1).Value = Application. _
VLookup(Target.Offset(, -1).Value, Sheets("帳簿在庫").Range("F:H"), 2, 0)

Target.Offset(, 2).Value = Target.Offset(, 1).Value - Target.Value

End Sub

B列の値をクリアした場合や複数セルを同時に変更した場合等の
エラー処理は考慮していません