次の方法で共有

色のついたセルのカウント

Anonymous
2012-02-10T03:02:40+00:00

CountColorでカウントできると思いますが、この関数が2010エクセルに入っていません。インストール方法を知りたいのでお願いします。

Microsoft 365 と Office | Excel | 家庭向け | Windows

ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント コメントはありません

質問作成者が受け入れた回答

  1. Anonymous
    2012-02-10T08:19:04+00:00

    ・こちらをご覧ください。

     【 アルファベット順エクセル関数一覧表 】

     http://www.eurus.dti.ne.jp/yoneyama/Excel/kansu/itiran.html#arufabetto

    Excelの標準の関数には CountColor はありません。

    ユーザー定義の関数を自分で作成することになります。

    こちらをご覧ください。

    【 色付きセルの件数をカウントする [CountColor] 】

     http://takashixxx.blog88.fc2.com/blog-entry-42.html

    4 人がこの回答が役に立ったと思いました。
    0 件のコメント コメントはありません

質問作成者が受け入れた回答

  1. Anonymous
    2012-02-10T09:24:33+00:00

    基本的には奥の細道さんのおっしゃる通りでVBAになるのですが、シート式でもMacro4を使うことによってColor Indexを取得できないわけではありません。(まあ、これもマクロですけど)

    色が判別できればそれを利用して、後はなんとでもなるわけです。

    ただし、Macro4は前時代の遺物ですので、何時廃止されるかわかりませんし、まともなドキュメントも入手できませんからお勧めしません。

    単に参考情報とお考えください。

    以下は2007年にMiyhanさんがニュースグループに投稿された記事です。

    なお、カラーインデックスの取得の部分はExcel2010でもxlsmで保存すれば機能することを確認してあります。


    「名前」機能を経由して Excel4Macro 関数を使う例です。

    Excel2000 SP3/Excel2002 SP3 の場合、マクロのセキュリティオプションが

    「高」でも機能します。

    Excel2003 SP2 の場合は、セキュリティオプションは中以下でマクロを有効に

    する必要があります。

    Excel2007 は SP1 のリリース前ですし、当面確認する予定はありません。

    「挿入」→「名前」→「定義」にて、以下の名前を定義します。

    名前        参照範囲

    Book        =GET.CELL(66,INDIRECT("A1"))

    Sheet       =SUBSTITUTE(GET.CELL(32,INDIRECT("A1")),"["&Book&"]","")

    Sheets      =SUBSTITUTE(GET.WORKBOOK(1),"["&Book&"]","")

    LeftCell    =OFFSET(INDIRECT("RC",FALSE),,-1)

    FillColor   =GET.CELL(63,LeftCell)

    CharColor   =GET.CELL(24,LeftCell)

    任意のセルに以下の数式を入力すると、各種情報が表示されます。

    =Book               :入力したセルのあるブック名

    =Sheet              :入力したセルのあるシート名

    =Sheets             :入力したセルのあるブック内のシート名配列

                      水平なセル範囲を選んで配列数式として入力のこと。

                      垂直なセル範囲の場合は、=TRANSPOSE(Sheets)。

    =Index(Sheets,n)    :n は整数として、n 番目のシート名

    シート名変更/シート削除時には自動更新されますが、シート挿入時には

    他セルに書式以外の変更があるか、手動再計算を実行しないと更新されません。

    =FillColor          :左隣セルの塗りつぶし色インデックス番号

    =CharColor          :左隣セルの(先頭の)文字色インデックス番号

    A列に入力すると、左側のセルがないのでエラーになります。

    書式の変更だけの場合は、再計算がトリガーされませんので更新されません。

    上記数式を入力したセル範囲を別のシートへコピーしようとすると、

    エラーメッセージが表示され、最悪の場合はクラッシュしますのでご注意。

    --

    Miyahn

    Microsoft MVP for Microsoft Office - Excel(Jan 2004 - Dec 2007)

    Miyahn's Archive: http://homepage2.nifty.com/miyahn/

    0 件のコメント コメントはありません

質問作成者が受け入れた回答

  1. sumz 177.8K 評価のポイント
    2012-02-10T08:18:10+00:00

    この件については多数の情報があるようですが、結論としては

    「VBAで自分で関数を作るしかないですね。」ということになりそうですね。

    以下は関連情報の一部です。

    エクセルで作成した表の中から、塗りつぶしたセルをカウントする方法はありませんか?

    http://answers.microsoft.com/thread/a4cd0d35-0ed3-457f-a1aa-98f2b41fb402

    塗りつぶし色の付いたセルを数える。[Excel]

    http://blogs.dion.ne.jp/day_after_day/archives/9456749.html

    色付きセルのみを合計する [SumColor]

    http://takashixxx.blog88.fc2.com/blog-entry-41.html

    色付きセルの件数をカウントする [CountColor]

    http://takashixxx.blog88.fc2.com/blog-entry-42.html

    Excel 2010  選択範囲内の色つきセルの合計を求めるユーザー定義関数

    http://www.geocities.jp/ttak_ask/office_docu/ec12_21.html

    0 件のコメント コメントはありません

1 件の追加の回答

並べ替え方法: 最も役に立つ
  1. Anonymous
    2012-02-17T01:12:10+00:00

    善場 進 さん、奥の細道 さん、y sakuda さん、コメントありがとうございます。

    誠服部 さん、こんにちは。 その後、いかがですか。

    みなさんからいただいたコメントがご参考になればと思います。

    同じような情報をお探しの方にもご参考になるよう、今回は私の方で \[回答としてマーク\] をいたしました。

    マーク後も、引き続き返信は出来ますので、さらに質問がある場合は、ご投稿も続けてくださいね。

    0 件のコメント コメントはありません