人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

EXELの関数について教えて下さい。表を作成し、縦列にズラッと数値を入力してあります。この数値はそれぞれフォントの色分けがされており、入力した数値によってそれぞれ「赤」「青」「黄」と色で区別されています。そこでお聞きしたいのですが、フォントの色で区別された各々の数値の合計を算出することはできるでしょうか。「赤のフォントの数値の合計はいくつか」「青のフォントの数値はいくつか」ということを、関数を使って自動計算したいのです。また、それができるのであれば「フォントの書体(明朝体表記の数値の合計、ゴシック体の数値の合計など)」でも可能でしょうか。

●質問者: aceK
●カテゴリ:コンピュータ
✍キーワード:けが ゴシック フォント 作成 入力
○ 状態 :終了
└ 回答数 : 1/4件

▽最新の回答へ

1 ● freemann
●60ポイント

多分マクロでないとできないと思います。

以下にマクロでフォントの色毎に合計するマクロのサンプルを載せておきます。

書体毎の合計もマクロでやれば可能だと思います。

Sub mySum()

Dim a As Range

Dim total(3) As Long

For Each a In Selection

If a.Font.ColorIndex = 3 Then '赤

total(1) = total(1) + a.Value

ElseIf a.Font.ColorIndex = 6 Then '黄色

total(2) = total(2) + a.Value

ElseIf a.Font.ColorIndex = 5 Then '青

total(3) = total(3) + a.Value

End If

Next a

Range("A1").Value = total(1) '赤の結果

Range("B1").Value = total(2) '黄色の結果

Range("C1").Value = total(3) '青の結果

End Sub

ダミー

http://q.hatena.ne.jp/1154152846

◎質問者からの返答

ありがとうございました!

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ