[[20141029175443]] 『列Aが値aのとき、列Bに値bを自動セットする。』(pooh) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『列Aが値aのとき、列Bに値bを自動セットする。(A≠aのときBには何もしない)』(pooh)

以下のことをしたいのですが、どのような関数になるのでしょうか。
IF関数でできるのでしょうか。

・表内の列Aを参照して、その値が特定の固定値(a)である場合に、列Bに、ある1つの固定値(b)を自動セットする。
(列Bは、もともと空白の場合と、何か値が入っている場合とがある)

・列Aの値を参照した結果、その値が特定の固定値(a)と等しくない場合、列Bの内容は変更しない(何もしない)。
(列Bは、もともと空白の場合と、何か値が入っている場合とがある)

・上記の処理を表内のすべての行に対して実行する。

ご教示のほど、よろしくお願いいたします。

< 使用 Excel:Excel2003、使用 OS:Windows7 >


 Sub test()

    Dim i As Long

    With Sheets("Sheet1")
        For i = 1 To .Cells(Rows.Count, "A").End(xlUp).Row
            If .Cells(i, "A").Value = "a" Then .Cells(i, "B").Value = "b"
        Next i
    End With

 End Sub

 こんな感じ?
(tora) 2014/10/29(水) 21:11

できました。
ありがとうございました。
助かりました〜。
(pooh) 2014/10/30(木) 19:50

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.