『異なる条件付書式が設定されたセルを複数選択して、新たに条件付書式を設定する』(miko) いつも御世話になっております。 条件付書式についてお伺い致しますが、例えばA、B、C・・・・AA列のセルにそれぞれ別々の条件付き書式が1個ないし2つ設定されております。そして、最後に全体のセルに同じ条件付き書式を設定したいのですが、うまくいきません。本来であれば最初に全体のセルに使用する条件付き書式を設定すれば良かったのですが、最後に気が付いたので試みましたがダメでした。 アドバイスよろしく御願い致します。 Excel2000 Windows2000 ---- がんばって考えて見ましたー。 もっと良い方法が有るとは思うのですが、回答がつかないようなのでのせちゃいますね。 マクロをつくりました。 以下は条件を追加して、条件によってフォントの色を青字にするタイプです。 Alt+F11でVBAの画面を出したら、 VBAProjectを右クリックで標準モジュール→挿入ででてきたところに 以下のものを貼り付けてください。 Sub a() Dim cel, jouken jouken = InputBox("条件式をいれてください") For Each cel In Selection cel.FormatConditions.Add Type:=xlExpression, Formula1:="=(" & jouken & ")" cel.FormatConditions(cel.FormatConditions.Count).Font.ColorIndex = 5 Next End Sub 実行の仕方は、設定したいところを全部選択したあとに、 ツール→マクロ→マクロで aを選択して実行 その後,条件をきかれるので、 例えば A3からB9までを選択していて、右どなりのセルが "ABC"だったら青字にするとした場合、 一番左上のセルを基準にして(この場合選択した中で一番左上はA3なので 右隣はB3になる)、条件式を B3="ABC" といれてください。 条件式が上記で追加されます。 (Uターンラッシュ) ---- ありがとうございました。 出来ました。お手数おかけ致しました。(miko)