エクセル関数の質問です

質問

下記の様な構成で約10000行の商品アイテムリストがあります。
Ａ列：商品コード
Ｂ列：商品名
Ｃ列：入数
で、ある基準に合致するアイテムはＡ列～Ｃ列迄セルの色が黄色になっています。
この色付のアイテムについてはＤ列に１を入れる事って可能でしょうか？
イメージとしてはＩＦ関数の様な感じで、
『＝ＩＦ（Ａ列の色＝黄色、Ｄ１＝１、””）』
の様な事なのかなと思うんですが、方法が分かりません。

目的はこのシートをアクセスにインポートして加工する為です。
宜しくお願い致します。

回答No.1

keithin · ベストアンサー

ご利用のエクセルのバージョンがご相談に明記されていませんので。

方法１：
最新版のExcle2007を使えば，色を塗ったセルをオートフィルタで絞り出して一気に数字の１をＤ列に書き入れることが出来ます。
現状ではこれが一番簡単な手ですが，それ以前のエクセルには探してもこの機能はありません。

方法２：
Excel2002以降では，
１．Ｃ列をコピーし，Ｄ列にそのまま貼り付ける
２．Ｄ列を列選択して，そのままDeleteキーを押し，
　　色を残してセルの中身を空にする
３．Ｄ列を列選択して（重要）
　　Ctrl+Hで置換のダイアログを出し
　　ダイアログのオプション>>を開き
　　検索する文字列には何も入れずに書式▼ボタンでセルの色の黄色をセット
　　置換後の文字列に数字の１を入れて全て置換する
と，できます。

方法３：
＞ある基準に合致する…黄色になっています。

今後は手抜きせずにその「基準」を理屈立てて数式で記述し，それをＤ列にそのまま記入しておけば何の手間も要りません。

方法４：
ネットで「get.cell」をキーワードに検索してみると，Ｄ列に入れるのに使えるマクロの方法（4.0マクロ関数と一般に言われる，関数と名前が付いていますが古いタイプのマクロの方法です）について説明したページが多数ヒットするので，Excel2000以前ではその方法も利用できます。

お礼

ありがとうございました！
方法２でできました。
置換えって初めて使いました。
ありがとうございます。

回答No.2

dogsiva

「ある基準に合致するアイテムはセルの色を黄色にする」
と
「ある基準に合致するアイテムはＤ列に１を入れる」

この２つは同じです。
D列のセルに
=if(【ある基準】,1,"")
これで大丈夫だろうと思います。

例：入数が100以上のもの(セルD2に入れた場合の例）
=if(c2>=100,1,"")

お礼

ありがとうございます。
前後してしまったんですけど、
ＮＯ１さんの方法で解決しました。
そっちを見る前にdogsivaさんに補足をしてしまいました。
でも、補足を無しにする方法が分からないので、
こちらに書かせていただきます。
もしこちらを見る前に補足に回答してもらったりしてたら
ゴメンナサイ。
ありがとうございました。

補足

ありがとうございます。
ただ、”ある基準”がエクセル上にはありません。

具体的に言いますと、商品コード、商品名、入数しか無く、
それを１個１個、人が商品名を見ていって該当する商品を色付きにしていった状態です。
（なので、本当は１個１個見ていった時に、色付きにするのではなく、区分か何かを入れてくれればよかったのですが）

宜しくお願い致します。