エクセルです。

  A1,B1,C1,D1・・・
A1
A2
A3
A4
A5
A6
A7



とあって
(1)奇数行のみの合計、又偶数行のみの合計
(2)A1,C1,E1,と2つ飛ばしの合計
をそれぞれ出したい場合の関数式を教えてください。 宜しくお願いします。

A 回答 (2件)

こんにちは。



いくつか方法がありますが・・
>(1)奇数行のみの合計、又偶数行のみの合計

データが A1:A10 として
奇数行のみの合計は↓
----------------------------------------
=SUM(IF(MOD(ROW(A1:A10),2)=1,A1:A10,""))
----------------------------------------
偶数行のみの合計は↓
----------------------------------------
=SUM(IF(MOD(ROW(A1:A10),2)=0,A1:A10,""))
----------------------------------------
↑いずれも配列数式です。
Ctrl+Shift+ENTER で確定してください。
↓のように数式の前後に { } がつけばOKです。
------------------------------------------
{=SUM(IF(MOD(ROW(A1:A10),2)=1,A1:A10,""))}
------------------------------------------

または SUMPRODUCT関数を使って
奇数行のみの合計は↓
------------------------------------------
=SUMPRODUCT((MOD(ROW(A1:A10),2)=1)*A1:A10)
------------------------------------------
偶数行のみの合計は↓
------------------------------------------
=SUMPRODUCT((MOD(ROW(A1:A10),2)=0)*A1:A10)
------------------------------------------

(2)A1,C1,E1,と2つ飛ばしの合計
A1:F1 までデータが入っているとして、
--------------------------------------------
=SUMPRODUCT(A1:F1*(MOD(COLUMN(A1:F1),2)=1))
--------------------------------------------
    • good
    • 0
この回答へのお礼

できました!

今日の夕方までに資料を仕上げなければならず、途方にくれてもう泣きそうでした。
お蔭様で後2時間もあれば完成しそうです。

本当に助かりました。心から感謝いたします。
ありがとうございました。

お礼日時:2005/04/01 13:05

私の未熟から1セルで行うにはVBAが必要かと


思われます。
1セルでなくてもいいのであれば
どこか別シートに下記のニュアンスでかかれてはいかがですか?
A1の対角線をA1セルとします。
(1)奇数
A1には
  =Sheet1!A1
A2には
  =IF(Sheet1!A1="",Sheet1!A2,"")
A3には
  =IF(Sheet1!A2="",Sheet1!A3,"")
を繰り返す。
偶数は上記を修正してください。

(2)も上記と同じような感じで行います。

上記で表示された数値を足しこんではだめでしょうか?
    • good
    • 0
この回答へのお礼

行と列を合わせると500近くのセルに合計を求めたいのです。
手間、時間、そして能力が限られています。

>VBAが必要かと思われます。
私には無理かもしれません・・・。(泣)

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

お礼日時:2005/04/01 12:24

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング