|
▼隼 さん:
>1.セルA1に、H,L,Fのいずれかを入力します。
>2.Hを入力した場合は、セルA10にHと表示する。
>3.Lを入力した場合は、セルA20にLと表示する。
>4.Fを入力した場合は、セルA30にFと表示する。
[A1]セルの値が変化したとき、処理をするようなコードは
そのシートのモジュールに書きます。
対象ワークシートの シート見出し(TABといいます) を右クリックする
と、一番下に「コードの表示」ってメニューがありますから、これを
クリックして出てくる シートモジュールに 以下のサンプルを貼り付け
てみてください。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) <> "A1" Then Exit Sub
Dim S As String
S = Target.Value
Select Case S
Case "H": [A10].Value = S
Case "L": [A20].Value = S
Case "F": [A30].Value = S
End Select
End Sub
> 5.H,L,Fの入力はそれぞれ複数回行います。
この意味が ちょっと「?」です。
|
|