Excelでの質問です。vista利用。
セルの色によって条件文(IF)をつけることはできますか?
やりたいのは、下図で説明しますと、
A1のセルに色付が入ったらB1とC1のセルを掛け算し、
D1のセルに表示。(Dセルにif文)
A2のように色無なら、Dは計算しない(表示しない)。
例
A B C D
1 色付セル 3 2 6
2 白セル(色無し) 5 4
3 色付セル 2 6 12
A列には、別のデータシートからデータをコピーし貼り付けます。
全て数字が入っているのですが、数字は無視し、背景の色で判断します。
このようなことはできますでしょうか?
説明が下手で申し訳ないのですが、教えていただけると助かります。
よろしくお願いします。
No.4ベストアンサー
- 回答日時:
こんにちは!
横からお邪魔します。
VBAの一例です。
A列には必ずデータが入っていて、1行目からあるとします。
尚、A列の色は何色でも関係なく、色がついていればD列に掛け算を表示するようにしてみました。
画面左下にある操作したいSheet見出し上で右クリック → コードの表示 → VBE画面が出ますので
↓のコードをコピー&ペーストしてマクロを実行してみてください。
(Alt+F8キー → マクロ → マクロ実行です)
Sub test() 'この行から
Dim i As Long
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(i, 1).Interior.ColorIndex <> xlNone Then
Cells(i, 4) = Cells(i, 2) * Cells(i, 3)
End If
Next i
End Sub 'この行まで
こんな感じではどうでしょうか?
尚、A列の色の限定があるのであれば当然コードは少し変わってきます。
参考になれば良いのですが・・・m(__)m
この回答への補足
ありがとうございます!!
非常に助かります!
が、今、データのあるPCとは別の場所に来てしまった為、明日、確認させていただきます!
VBAコードまで丁寧に記載していただき、大変感謝です。(全く理解できないレベルですが)
コピペでできることを祈るのみです。
取り急ぎお礼まで。
大変遅くなってしまい申し訳ありません。
とても丁寧に教えていただき、本当にありがとうございました。
教えていただいたコードで、質問時の場合にはちゃんと動作することができました!
ただ、少し位置が異なると途端にNG。。。(一応コードを修正してみたりしたのですが、、、)
もしお時間があれば、教えていただけたら幸いです。
ありがとうございました。
新たな質問URLです。
http://oshiete1.watch.impress.co.jp/qa6898821.html
No.5
- 回答日時:
No.4です!
たびたびお邪魔します。
No.3さんの回答を拝見して気になったので、再びお邪魔しました。
No.3さんが仰っているようにA列のセルの色が条件付書式によって付けられているのであれば
前回のコードでは全く反応しません。
コード内にその条件を組み込む必要があります。
もし条件付書式で色が付けられている場合、具体的な条件さえ判れば可能です。
前回のコードは単に手作業で色を付けた場合のみ有効です。
何度も失礼しました。m(_ _)m
この回答への補足
ro-maji de sumimasen.
goteinei ni arigatou gozaimasu. totemo ureshiidesu!!
PC furyou no tame,oshiete itadaita code wo tamesu koto ga mada dekite imasen...
moushiwake arimasen.
tonikaku oreidake saki ni otsutae shitaku te komento dake
kakasete itadakimashita.
arigatou gozaimasu.
大変遅くなってしまい申し訳ありません。
とても丁寧に教えていただき、なおかつ時間を割いて再度ご回答下さいまして
本当にありがとうございました。
教えていただいたコードで、質問時の場合にはちゃんと動作することができました!
ただ、少し位置が異なると途端にNG。。。(一応コードを修正してみたりしたのですが、、、)
もしお時間があれば、教えていただけたら幸いです。
ありがとうございました。
新たな質問URLです。
http://oshiete1.watch.impress.co.jp/qa6898821.html
No.3
- 回答日時:
セルの色を判断できる関数はありません。
マクロを使うことになるでしょう。それ以外にどうしてもということでしたらA列で色つきセルとした条件(条件付き書式)があると思いますのでその条件を使って式を組み立てることですね。この回答への補足
回答ありがとうございます。
マクロだとどういったマクロになりますか?マクロで色判断ができる方法がわかりません。。。
すいません、教えていただけますか?
No.2
- 回答日時:
こちらの「セルの色を別のセルに表示させるユーザー定義関数」を使って、A列のセル色を表示させた別のセルの文字をIF文に組み込めばできると思います。
http://www.relief.jp/itnote/archives/001873.php
もしくは下記の質問回答にあるようにVBAで組むかでしょうか。
http://detail.chiebukuro.yahoo.co.jp/qa/question …
ご回答になっていればいいのですが。
No.1
- 回答日時:
VBAならば可能だとは思いますが、式では無理じゃないかな。
式でやるのであれば、キーとなる値で判定させる方が現実的かと。
if(A1<>"";B1*C1;"")
みたいな感じで。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 昨日、質問した件『VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカ 4 2022/04/07 14:39
- Excel(エクセル) エクセルの祝日に色が反映しない 4 2022/05/18 09:58
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) こんなことできますか?例えば、sheetに貼り付けた図形のタイトルを、セルA1の文字で表示する。 5 2022/04/22 15:25
- Excel(エクセル) エクセルの条件付き書式で*を使いたい 4 2022/05/13 16:49
- Excel(エクセル) エクセルで教えて下さい。 2 2022/05/18 13:00
- Excel(エクセル) エクセルの関数式を教えてください。 2 2022/11/29 21:09
- Excel(エクセル) Excelについて A1からA12まで、1月〜12月と入力し、 B1からB12の範囲に、C1とD1に 4 2022/05/26 22:48
- その他(Microsoft Office) (至急)Googleのスプレッドシートの条件付き書式について 2 2022/09/11 08:50
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
【Excel】 セルの色での判断はできますか?
Excel(エクセル)
-
Excel 書式を関数で判断。
Excel(エクセル)
-
条件付き書式で色をつけたセルを判断して他のセルの色をつけることは可能でしょうか?どの様な方法がありま
Excel(エクセル)
-
-
4
セルの色で判別する方法教えて
Excel(エクセル)
-
5
excel 参照しているセルに色がついていたら、返すセルにも色もつける
その他(コンピューター・テクノロジー)
-
6
あるセルに色を付けた時、別のセルにも同じ色が付く
Excel(エクセル)
-
7
背景色の有無を判断をして別のセルに「1」と入力
Excel(エクセル)
-
8
excelのデータで色つき行の抽出方について教えてください
Excel(エクセル)
-
9
エクセルで色の付いたセルを抽出したいです
Excel(エクセル)
-
10
エクセルでセルの色番号を表示する方法
Excel(エクセル)
-
11
excelのCOUNTIF関数で、『範囲=色のついたセル』に設定したいです。
Excel(エクセル)
-
12
エクセル セルの色で条件分岐
Excel(エクセル)
-
13
EXCEL関数での文字の色での判別
Excel(エクセル)
-
14
Excel 条件によって入力禁止にする
Excel(エクセル)
-
15
エクエルで隣のセルの文字が赤色だった場合は指定するセルも赤色にしたい
Excel(エクセル)
-
16
Excelで色付けしたセルに対し対応するセル値で返す方法
Excel(エクセル)
-
17
Excelの条件付き書式を崩されたくない
Excel(エクセル)
-
18
条件付き書式の色付きセルのカウント方法について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
A1に入力された文字列と同じ文...
-
エクセルマクロ オートSUM(合...
-
アクティブになっている行をマ...
-
EXCELマクロを使い、空白行では...
-
VBA アクティブ行の削除
-
エクセルで特定の文字列が入っ...
-
空白行から空白行までの合計値...
-
エクセルVBA:リストに登録した...
-
Excelのフィルター後の一番上の...
-
このような複雑な表をワードで...
-
エクセル マクロ オートフィ...
-
エクセルで昨日までの日付デー...
-
エクセルで作った表の(行幅や...
-
エクセルマクロで日本語を抽出...
-
エクセル 数字のみ残したい
-
EXCEL 行をまたぐ表示
-
ピボットテーブルで文字列…
-
Excelでカタカナ・ひらがな・英...
-
【マクロ】Excelでコンタクトシ...
-
【VBA】全て空白のセルの列幅を...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
エクセル マクロ オートフィ...
-
【Excel関数】UNIQUE関数で"0"...
-
[EXCEL]ボタン押す→時刻が表に...
-
結合されたセルをプルダウンの...
-
エクセル マクロで数値が変っ...
-
Excel グラフのプロットからデ...
-
AのセルとB行を比較して、一致...
-
エクセル 上下で列幅を変えるには
-
Excel ウインドウ枠の固定をす...
-
特定の文字がある行以外を削除...
-
excelのデータで色つき行の抽出...
-
エクセル2016で時間を入力して...
-
excel 小さすぎて見えないセル...
-
EXCELで最後の行を固定
-
エクセルVBA 最終行を選んで並...
-
VBAで色の付いているセルの行削除
-
エクセルマクロで偶数行(又は...
-
エクセルのセルに指定画像(.jpg...
-
罫線の斜線を自動で引くマクロ
おすすめ情報