| |
▼kanabun さん：
回答をありがとうございます。
>▼隼 さん：
>>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の入力はそれぞれ複数回行います。
>この意味が ちょっと「？」です。
|
|
隼
- 12/3/14(水) 13:53 -
