Excel VBA質問箱 IV

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

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


7129 / 13645 ツリー ←次へ | 前へ→

【40922】Excelの集計で困っております kenji 06/7/26(水) 11:29 質問[未読]
【40923】Re:Excelの集計で困っております へっぽこ 06/7/26(水) 11:39 発言[未読]
【41035】Re:Excelの集計で困っております kenji 06/7/28(金) 9:43 発言[未読]
【41037】Re:Excelの集計で困っております だるま 06/7/28(金) 10:09 回答[未読]
【41038】Re:Excelの集計で困っております だるま 06/7/28(金) 10:11 発言[未読]

【40922】Excelの集計で困っております
質問  kenji  - 06/7/26(水) 11:29 -

引用なし
パスワード
    Excelで集計したとき、たとえば下の図で、集計行(−)が付いていますが、集計行だけを折り畳んだときに、名前行を0ではなくAさんとかで表示したいのです。
まず手動で、集計後にマクロで、集計行の上のセル(たとえばAさん)とかを単純にコピーし、集計行の0の部分に貼り付けることができればいいのですが。
 手作業でもいいのですが、顧客名が多くて大変です。よろしくお願いします。


| 顧客コード 名前   合計
| A001    Aさん  1000
| A001    Aさん  2000
| A001    Aさん  1000
−   0       0  4000
| A001    Bさん  3000
| A001    Bさん  1000
| A001    Bさん  2000
−   0       0  6000

【40923】Re:Excelの集計で困っております
発言  へっぽこ  - 06/7/26(水) 11:39 -

引用なし
パスワード
   こんにちは。

集計のグループにどの項目を指定しているのでしょうか?
名前を指定すると集計行には「Aさん 集計」と表示されると思うのですが。

【41035】Re:Excelの集計で困っております
発言  kenji  - 06/7/28(金) 9:43 -

引用なし
パスワード
   一応顧客コードで括っておりますが
集計行には顧客コードとか、名前とか
(他にも列があるのですが)
表示させたいです。
よろしくお願いします。


▼へっぽこ さん:
>こんにちは。
>
>集計のグループにどの項目を指定しているのでしょうか?
>名前を指定すると集計行には「Aさん 集計」と表示されると思うのですが。

【41037】Re:Excelの集計で困っております
回答  だるま WEB  - 06/7/28(金) 10:09 -

引用なし
パスワード
   >手動で、集計後にマクロで、集計行の上のセル(たとえばAさん)とかを単純にコピー
>し、集計行の0の部分に貼り付けることができればいいのですが

「集計行の0の部分」ではなく空白の部分ですよね。

私、集計機能は余り使ったことがないので、「0」になる場合があるなら下記コードでは
だめですが。^d^

Sub test()
  Dim R As Range
  With ActiveCell.CurrentRegion
    For Each R In .SpecialCells(xlCellTypeBlanks)
      R.Value = R.Offset(-1).Value
    Next
  End With
End Sub

【41038】Re:Excelの集計で困っております
発言  だるま WEB  - 06/7/28(金) 10:11 -

引用なし
パスワード
   後もうひとつ、データ自体の中に空白セルがある場合もだめです。^d^

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