• ベストアンサー

エクセルについて(その2)

sakenomoの回答

  • sakenomo
  • ベストアンサー率52% (35/67)
回答No.13

No.6です。 >ユーザー定義関数では難しそうなので、 これは、"作るのが"という意味です。誤解を招きそうなので・・・。 ひとつのセルに入れた関数だけで色別の結果を出したい、と思っていましたので。 で、私も一つ作ってみました。 引数の「範囲」は、調べたいセル範囲を。 「基準」は、調べたい色で塗られたセル(一個)を指定してください。 「基準」のセルは、「範囲」の中でも、外でもかまいません。 Function CountInCol(範囲 As Range, 基準 As Range)   Dim c As Range, i As Long   For Each c In 範囲     If c.Interior.ColorIndex = 基準.Interior.ColorIndex Then       i = i + 1     End If   Next c   CountInCol = i End Function

maro-h
質問者

お礼

お礼の挨拶が遅くなり恐縮です。 sakenomo様には、何かとプログラムを考えて頂き、本当に感謝しています。と同時に、「凄いなぁ」とも感服しています。 何はともあれ、本当に有難うございました。

関連するQ&A

  • エクセル

    Excel2010で、色つきセルの中で指定した文字列を数える数式はありますか? 入力された文字列は15種類、それが色つきセルになっているものと、色がついていないセルに分かれています。文字列別のカウント(色つきセルも色無しセルも区別のない、文字列のみの条件でのカウント)はCOUNTIFで既に出ていますが、色つきになっているセル限定で文字列別にカウントするのはどうしたらいいでしょうか?

  • Excelの条件付き書式の背景色を取得すると・・

    Excel2016を使用しています。 セルの背景色を取得するユーザー定義関数を作って色番号を調べました。 (1)条件付き書式でセルの背景色を塗りつぶしたセル(B1) (2)直接背景色を塗りつぶしたセル(B2) (3)背景色を塗りつしていないセル(B3) 上記3種類を調べたところ、(2)だけは色番号を示し、(1)(3)は何も塗りつぶしていないという結果になりました。 どうして(1)は色を反映していないのでしょうか?

  • エクセルで複数の条件に合うセルをカウントするには

    こんにちは。 エクセルについて質問です。 ある集計をやっているのですが、カウントがうまくいきません。 7/10(白) 7/20(黄) 7/10(黄)  *()はセルの色 簡単に書くと上の表のようなものを集計するのですが、「セルの色=黄色かつ日付=7/10」というセルの数をカウントしたいのです。 指定した色のついたセルをカウントする関数は、下のURLの質問を見て作りました。 どのような関数を組み合わせればできるでしょうか…。 わかりにくい質問かもしれませんがよろしくお願いします。 http://oshiete1.goo.ne.jp/kotaeru.php3?q=59571

  • エクセル 2003 関数

    エクセル 2003 関数 お世話様です。 XPのエクセル2003にてセルA1に数値の3を入れております。 これをセルC5の文字間に関数値として挿入する事は可能でしょうか? 例: セルA1に数字の3、セルC5に【カウントです。】と入力されていたら    【カウント3です。】となります。 セルA1の数値によってセルC5の入力内容が変わるようにしたいのですが 可能でしょうか? お手数ですが、ご存知の方がいましたらご教授下さい。 以上、何卒宜しくお願い致します。

  • Excelのcountif関数について

    エクセルのcountif関数について質問をさせていただきます。 Countif関数で「B1」と「B2」や「N」と「n」いう数値を別数値として数えたいのですが、 countif(セル:セル,"B1"」 と入れると、どうもB2もカウントされてしまいます。 別数値としてカウントする方法を教えていただけないでしょうか。 宜しくお願いします。

  • excelマクロ subプロシージャに関して

    excelでセルの色を変えるというものをコーディングしました。 選択したセルの隣のセルの値がそれぞれ、○だったら選択したセルの色を変えるプログラムです。 引数なしのため、ユーザー定義関数として定義することができず?、subプロシージャとして定義しているので、 シート内で全ての行に対応させることができず、実行するには一行ずつ、マクロの実行をさせなければ、このプロシージャを使えず、困っています。1行ずつでは作った意味がないので。。。 作ったプロシージャが手元にないので、明日アップしたいと思いますが、質問の意味がわかるかたいましたら、お願いします。

  • Excel ユーザー定義について教えてください!!

    よろしくお願い致します!! Excel「セルの書式設定」→「<タブ>表示形式」→「ユーザー定義」に、新しく「種類」を追加し保存後終了しました。 同じ文書ではなく、新たにExcelを立ち上げると、追加したユーザー定義がありません。ユーザー定義とは、「追加したBookでのみ有効」なのでしょうか??? ご回答、どうかよろしくお願い致します。

  • エクセルの書式設定の「#」

    エクセル2002の書式設定についてですが、セルの書式設定の「表示形式」で「ユーザー定義」にします。そして種類のところには「#」と入れました。 セルに「999」と入力すると「999」と表示されました。 ところが「ユーザー定義」の種類のところには「#,」と入れました。 するとセルに「999」と入れても「1」と表示されます。 またセルに「9999」と入れたら「10」と表示されました。 これはどうしてでしょうか?

  • Excel ユーザ定義関数を作りたい

    ユーザー定義関数を作りたいのですが どのような本で勉強をしたら良いのかがわかりません。 お勧めの本などがあれば教えてください。 C言語は一通りできます。 とりあえず作りたい関数が一つあってインターネットで調べながら 作っているのですが 選択したセルの背景(塗りつぶしの色?)を 変更するにはどうすればよいのでしょうか? 以上二つについて宜しくお願いします。

  • エクセル2007のユーザー定義について教えてください。

    エクセル2007のユーザー定義について教えてください。 A1のセルにX001のようなコードが入力されている場合,RIGHT関数を使って右端の1を抽出し,この1に「日目」などの文字を結合して「1日目」と表示したいですがセルのユーザー定義で可能でしょうか。=RIGHT(A1,1)&"日目"のようにやればできますが,セルのユーザー定義でやりたいと思っています。