Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


8393 / 13646 ツリー ←次へ | 前へ→

【33431】関数についての質問 KS 06/1/11(水) 22:56 質問[未読]
【33432】Re:関数についての質問 かみちゃん 06/1/11(水) 23:03 回答[未読]
【33554】Re:関数についての質問 KS 06/1/15(日) 10:12 質問[未読]
【33556】Re:関数についての質問 kobasan 06/1/15(日) 14:05 回答[未読]
【33560】Re:関数についての質問 Hirok 06/1/15(日) 17:15 発言[未読]
【33563】Re:関数についての質問 かみちゃん 06/1/15(日) 17:51 発言[未読]

【33431】関数についての質問
質問  KS  - 06/1/11(水) 22:56 -

引用なし
パスワード
   初めまして、困ったことがあって質問があります。

食事代 1,000
光熱費 2,000
その他 1,500
食事代 1,500    食事代合計

という表があった場合に食事代の数値を自動に探し出して食事代合計の右のセルに値を合計し表示させる関数などはありますか?
説明がわかりづらいかもしれませんがわかる方教えてもらえませんか?

【33432】Re:関数についての質問
回答  かみちゃん  - 06/1/11(水) 23:03 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>という表があった場合に食事代の数値を自動に探し出して食事代合計の右のセルに値を合計し表示させる関数などはありますか?

VBAでしたいのですか?
以下のような一般関数でできるのですが・・・
食事代合計をD4に求める場合、
=SUMIF(A1:A4,SUBSTITUTE(C4,"合計",""),B1:B4)

【33554】Re:関数についての質問
質問  KS  - 06/1/15(日) 10:12 -

引用なし
パスワード
   返事遅くなってすみません。
VBAの質問箱に関数の質問をしてしまいすいませんでした。
表があるシートではなく他のシートにSUMIFで出しだ値を表示させるにはどうすればよいでしょうか?
もしよろしければ教えてください。

【33556】Re:関数についての質問
回答  kobasan  - 06/1/15(日) 14:05 -

引用なし
パスワード
   ▼KS さん 今日は。

>表があるシートではなく他のシートにSUMIFで出しだ値を表示させるにはどうすればよいでしょうか?


Sheet1が元データとし、下記のようにSheet2に表示するとして、
これでどうですか。

    A        B
1 食事代合計    =SUMIF(Sheet1!$A$1:$A$4,SUBSTITUTE($A1,"合計",""),Sheet1!$B$1:$B$4)
2 光熱費合計    =SUMIF(Sheet1!$A$1:$A$4,SUBSTITUTE($A2,"合計",""),Sheet1!$B$1:$B$4)
3 その他合計    =SUMIF(Sheet1!$A$1:$A$4,SUBSTITUTE($A3,"合計",""),Sheet1!$B$1:$B$4)

【33560】Re:関数についての質問
発言  Hirok  - 06/1/15(日) 17:15 -

引用なし
パスワード
   ▼KS さん 今日は。

最初の食事代がA2にある状態の表があるとして
D3に食事代合計を算出

Sub 食事代合計()

Dim R As Range
Dim MyR As Range

Set MyR = Range("A2", Range("A65536").End(xlUp))
For Each R In MyR
If R = "食事代" Then
  R.Offset(, 2) = R.Offset(, 1)  
End If  
Next
  Range("D2").Formula = "=SUM(C:C)"
 
End Sub

C列を使っています。これを使わない方法は識者から回答が
頂きたいですが…

【33563】Re:関数についての質問
発言  かみちゃん  - 06/1/15(日) 17:51 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>表があるシートではなく他のシートにSUMIFで出しだ値を表示させるにはどうすればよいでしょうか?

kobasanさんのコメントを参考にしてください。

8393 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free