• ベストアンサー

ExcelVBAについて教えて下さい。

エクセルの機能にある、条件付き書式を設定したいと考えています。 エクセルの機能を使用すると、ファイルサイズが大きくなり、 動作が遅くなるため、プログラムで何とかならないかと考えました。 A1～AZ100の範囲でセルの値が、「ABC」と「ZZZ」の時に、ピンクの網掛けを設定したいのですが、どのようにしたら良いのでしょうか？ ご教示頂けたらと思います。 宜しくお願い致します。

質問者が選んだベストアンサー

  • ベストアンサー
  • fujillin
  • ベストアンサー率61% (1594/2576)
回答No.2

雰囲気の参考のみ For Each r In Range("A1:A100") If r.Text = "ABC" Then r.Interior.ColorIndex = 38 r.Interior.Pattern = xlGray25 r.Interior.PatternColorIndex = 2 End If Next r

n_c63amg
質問者

お礼

有難うございました。 無事解決できました。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

値を取得し比較し該当したら網掛けする。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • 条件付書式　しましまともう1つ書式を設定

    エクセルの表をしましま（1行ごとにグレー）にしたいのですが、 条件付書式で、"=AND(MOD(ROW(),2)=1)" を設定すればしましまにできるところまでは分かりました。 ですが、すでに、*の書いてあるセルを網掛けにする条件付書式が入っているセルがあります。 （条件付書式で、セルの値が　次の値に等しい　="*"） *の入っているセルは、網掛けで、かつ、しましまにしたいのですが、 そのような設定は可能なのでしょうか?

  • エクセルのセルの色

    こんにちは。 エクセルで、例えばＡ１の値が１だったらＡ１～Ｗ１の範囲のセルをピンクに、Ａ１の値が２だったらＡ１～Ｗ１の範囲をブルーにといった設定はどのようにすればよいのでしょうか。Ａ１が１ならＡ１をピンクにというのであれば条件付書式でできるのですが、他のセルの値に応じて色を変えるのはまた別になるのでしょうか。よろしくお願いします。

  • excel条件付き書式・余計な記号まで認識されてしまう

    いつもお世話になります。 30以上の数字が入っているセルに、網掛けがしたく、範囲指定をし、条件付き書式で、 「セルの値が」「次の値以上」「30」を網掛けと設定しました。 確かに、30以上の数字が網掛けになりましたが、データ無しのセルを「---」としてあるのですが、それらもすべて網掛けになってしまうのです。データ無しを「＊」などの違う記号に変えてみましたが、やはりなぜか30以上と認識されてしまうようで、網掛けがされてしまいます。または、「'---」と、「'」記号を付けて文字と認識させてもだめでした（網掛けされてしまう）。 何が悪いのでしょうか？ どうすれば、30以上の数字だけが網掛けされるようになるでしょうか。

  • スプレッドシートの条件付き書式で2条件を適用したい

    Googleスプレッドシートの条件付き書式を利用して、添付画像のように、 1. B列の値が0ならば、A列のセルをピンク色にする。 2. C列の値が0ならば、A列の文字を太字にする。 というふうにしたいと考えています。 しかし、現時点で私は「1」しか実現できていません。 というのも、条件付き書式で 範囲に適用→A1:A3 書式ルール→カスタム書式「=B1=0」 書式設定のスタイル→セルをピンク色に とすればまずセルをピンクにはできますが、「＋条件を追加」ボタンから 範囲に適用→A1:A3 書式ルール→カスタム書式「=C1=0」 書式設定のスタイル→文字を太字に を設定しても、こっちは無視されるのです。どうすればよいでしょうか。

  • EXCELの表示形式

    Excelのセルの数値を1000円単位で表示する時に、書式設定のユーザー定義で#,##0,と指定すると、自動で四捨五入された値が表示されるのですが、これを切り捨てした値を表示する方法をご存知の方はいらっしゃいますか？なお、EXCELの関数を利用せず実現させる必要があります。 ※Webのプログラムからエクセル出力機能で、テンプレートに書式設定を埋め込むのでセルには関数は埋められないのです。

  • 変更箇所の色が変わるような設定は可能ですか？

    エクセル2010を使っております。 ある表において、値を書き換えると、そのセルの文字の色（もしくはセルの色）が変わるような設定をすることは可能ですか？ 条件付き書式で、１つのセルずつ、そのような設定をすることが可能なのはわかりますが、範囲を指定して複数のセル範囲において、そのような設定を一発でする方法があればお教えください。 よろしくお願いいたします。

  • 結合セルでの条件付き書式の方法

    エクセルで結合セルの条件付き書式の方法について教えていただけたら幸いです。 Excel2010を使用しております。 カレンダーを作成しようと、月によって曜日が自動で入力されるように設定をし、特定の曜日や祝日に網掛けをするように設定をしました。 （網掛けは条件付き書式で特定の曜日はWEEKDAYの数式、祝日はCOUNTIFの数式を使って設定しました） 添付画像ですと例えばA８とA９、B８とB９がセルの結合してあるのですが、網掛けが適用されるのが8の行だけで９の行には網掛けが適用されません。 セルの結合で空データのためそのようになっているのかとは思いますが、8の行、9の行ともに網掛けをするように設定することはできないのでしょうか？ 回答よろしくお願いいたします。

  • エクセルで、セルに「合格」という文字が入ったら、そのセルの入った行全体に灰色の網掛けがかかるようにできますでしょうか？

    ほぼタイトル通りなのですけれど、 エクセル（９７）であるセルに「合格」という 文字列が入りましたら、そのセルの入った 行全体（表の中の事なので表の中のみ）に灰色の 網掛けがかかるようにできますでしょうか？ 「条件書式」を使いますと、一つのセルに「合格」と 入りますと、そのセルのみに網掛けがかかってしまうようですし、行全体に網掛けがかかる方法を探しています。。 何か機能を組み合わせていい方法はないでしょうか？

  • VBA

    エクセルＶＢＡの質問です。 条件付書式で、今日の日付以上だとピンクの網掛けにする。 としました。 だけど、これだと空白のセルにもピンクが塗られてしまいます。 空白は何も色を塗らないとするにはどうするのですか。 以上の全てのことができるＶＢＡプログラミングの式はどう書くか教えてください。

  • 条件付き書式で出来ない？

    皆様宜しくお願い致します。 Excel2002を使用しています。 A1セルに製造年を入力→B1セルに今年との差年を表示させています。 B1セルの式は《=IF(A1="","",YEAR(TODAY())-A1)》としています。 このB1セルに条件付き書式で 《セルの値が10よりも大きかったら網掛パターンでセルに網をかける》 にしました。10年を超えた数値のセルのみを判別しやすくしたかったのです。 ところが…？？ A1セルに2000と入力→B1セルに《11》と表示され網掛けする A1セルに2001と入力→B1セルに《10》と表示され網掛けが消える A1セルが空欄だと（年数を入力しないと）→網掛けになるんです？ A1セルが空欄の時にはB1セルに網掛けがかかって欲しくないのですが… どのような書式設定、またはセルの式をすれば良いのでしょうか？ 皆様のアドバイスをお願い致します。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する