Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5094 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【52654】4つ以上の条件付き書式について J 07/11/23(金) 23:26 質問[未読]
【52656】Re:4つ以上の条件付き書式について じゅんじゅん 07/11/24(土) 9:44 発言[未読]
【52657】Re:4つ以上の条件付き書式について P 07/11/24(土) 9:46 発言[未読]
【52659】Re:4つ以上の条件付き書式について 吉本 07/11/24(土) 10:02 回答[未読]
【52661】Re:4つ以上の条件付き書式について じゅんじゅん 07/11/24(土) 10:23 発言[未読]
【52665】Re:4つ以上の条件付き書式について J 07/11/25(日) 8:24 お礼[未読]
【52654】4つ以上の条件付き書式について
質問  J  - 07/11/23(金) 23:26 -
引用なし
パスワード
   こんばんわ。
よく分からないので、教えて頂けますでしょうか。

セルB6にリストを作り、空白も含め7つ選べる項目があります。
空白以外の項目を選ぶと、指定した書式になるようにしたいのですが、
どのようにすればいいのか分かりません。
乱文で分かりにくいかと思いますが、どなたかご教示頂けないでしょうか。

リストは以下の様に設定されていて、指定したい書式は以下の通りです。
Z　空白
A　薄い青の塗りつぶしに、白い字
Aa 薄い青の塗りつぶしに、白い字
B　黄色の塗りつぶしに、赤い字
Bb 黄色の塗りつぶしに、赤い字
C　塗りつぶし無しで、ピンクの字
Cc 塗りつぶし無しで、ピンクの字

同じ内容のリストが、B6:AF19の範囲であります。

どうか宜しくお願いします。
【52656】Re:4つ以上の条件付き書式について
発言  じゅんじゅん  - 07/11/24(土) 9:44 -
引用なし
パスワード
   ▼J さん：
>リストは以下の様に設定されていて、指定したい書式は以下の通りです。
>Z　空白
>A　薄い青の塗りつぶしに、白い字
>Aa 薄い青の塗りつぶしに、白い字
>B　黄色の塗りつぶしに、赤い字
>Bb 黄色の塗りつぶしに、赤い字
>C　塗りつぶし無しで、ピンクの字
>Cc 塗りつぶし無しで、ピンクの字
>
>同じ内容のリストが、B6:AF19の範囲であります。
>
>どうか宜しくお願いします。

セルＢ６：ＡＦ１９を選択
条件付き書式で「数式が」を使い

条件１
=OR(B6="A",B6="Aa")　条件設定

条件２
=OR(B6="B",B6="Bb")　条件設定

条件３
=OR(B6="C",B6="Cc")　条件設定

>Z　空白
ここがちょっと不明ですけど、上記内容ではダメですか？
【52657】Re:4つ以上の条件付き書式について
発言  P  - 07/11/24(土) 9:46 -
引用なし
パスワード
   ▼J さん：
>こんばんわ。
>よく分からないので、教えて頂けますでしょうか。

B　黄色の塗りつぶしに、赤い字
Bb 黄色の塗りつぶしに、赤い字
　
塗りつぶしと文字色が同じもので「B」と「Bb」を判断することは
出来ません。が・・・
【52659】Re:4つ以上の条件付き書式について
回答  吉本  - 07/11/24(土) 10:02 -
引用なし
パスワード
   ▼J さん：

コードの原型を書きました

>B　黄色の塗りつぶしに、赤い字
>Bb 黄色の塗りつぶしに、赤い字
これとB・C列を使っています
　Dim i As Integer
　 For i = 6 To 19
　　If Cells(i, 2).Value = "B" Or Cells(i, 2).Value = "Bb" Then
　　　Cells(i, 3).Interior.ColorIndex = 6
　　　Cells(i, 3).Font.ColorIndex = 3
　　End If
　 Next


>同じ内容のリストが、B6:AF19の範囲であります。
意味が少し分かりにくいですが、上の原型をアレンジ(列方向に２又は３なのでしょうか移動させていくと出来ると思います。
【52661】Re:4つ以上の条件付き書式について
発言  じゅんじゅん  - 07/11/24(土) 10:23 -
引用なし
パスワード
   >▼J さん：

私だいぶ勘違いしているのかも。

セルの入力規則−リストで選択された値によって、
そのセルの塗りつぶしやフォント色を変更したいのだと
思っていたのですが・・・
（ＡやＡａは例えの文字として）

違っていたらすいません。
【52665】Re:4つ以上の条件付き書式について
お礼  J  - 07/11/25(日) 8:24 -
引用なし
パスワード
   じゅんじゅん様、P様、吉本様、どうもありがとうございました。

じゅんじゅん様の条件付き書式で解決できました！
条件付き書式の「数式が」を完全に見逃していて、
VBAを使わないと解決出来ないと思い込んでいたようでしたf^^;

改めて、どうもありがとうございましたm(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5094 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free