Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55148 / 76732

←次へ　｜　前へ→


	【26363】Re:売上の一覧を販売者単位でシートに集...

yasu - 05/7/2(土) 18:38 -


	引用なし

	パスワード

▼kobasan さん：

最終まで色々とご指導ありがとうございました。
大変勉強になりました。
また貴兄の作成されたマクロは非常に早く展開する事も
実感しました。合計が０でしたが・・・

又質問が出てきました。
月日　　　氏名　　　　売上
7月1日　　　　AA　　　　10
7月1日　　　　BB　　　　20
7月3日　　　　CC　　　　　30
7月4日　　　　AA　　　　10
7月5日　　　　BB　　　　20
7月4日　　　　CC　　　　　30
7月7日　　　　AA　　　　10
7月8日　　　　BB　　　　20
7月10日　　　　CC　　　　　30
7月9日　　　　AA　　　　10
7月11日　　　　BB　　　　20
7月12日　　　　CC　　　　　30
7月13日　　　　DD　　　　40
7月14日　　　　FF　　　　50
7月22日　　　　KK　　　　100
　　　　　　　　　430

売上の一番下にsubtotal（430）を入れたいのですが、行が
増えても売上の一番下にSubtotalをしたいのですが
固定のマクロはできるのですが
＝(イコール）以下の書き方を教えていただけませんでしょうか？
Sub Macro1()
　　
　　Range("C65536").End(xlUp).Offset(1).FormulaR1C1 = "=SUBTOTAL(9,R[-13]C:R[-1]C)"
　　
End Sub

また、ここまで出来ると、欲が出てきて全ページ（シート）全てを順次印刷する
別のマクロを考えたいと思っています。しばらくこれもかかるかと
思いますが、ヒントをいただければ幸いです。
本当にありがとうございました。御礼まで。

1 hits

▼

【26342】売上の一覧を販売者単位でシートに集計する yasu 05/7/2(土) 8:32