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

エクセルVBA
このような事は可能でしょうか?
特定のシート(複数)のA1が選択されている状態でSheet1のB1に選択されているセルの合計を出す事は可能でしょうか。

理論上可能かだけ知りたいです。
可能であれば詳細も兼ねて別途質問しようと思います。

●質問者: 匿名質問者
●カテゴリ:科学・統計資料
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

質問者から

ちなみに特定のシート名は変動するものとします。


1 ● 匿名回答1号

こんな感じのことですか?
3D集計(串刺し集計)--Excel・エクセル
できそうな気がします。


2 ● 匿名回答2号

下のコードを実行すると、sheet1?sheet4(シートの名前は無関係)の
各シートの中で、選択されているセルが数値の場合のみ、その数値を合計し、
sheet1(シートの名前はどうであっても)のC5(Cells(5, 3))に入れてくれます。
各シートで選択されているセルは、
B1ではなくても、どの位置でも、いくつのセルでも、
シートごとに違うセルが選択されていても、
選択してあれば、合計はしてくれます。

Sub test()
Dim r As Range
Dim rtotal As Double
rtotal = 0
For i = 1 To 4
Sheets(i).Activate
For Each r In Selection.Cells
If IsNumeric(r) = True Then
rtotal = rtotal + r.Value
End If
Next r
Next
Sheets(1).Activate
Sheets(1).Cells(5, 3) = rtotal
End Sub

関連質問

●質問をもっと探す●



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