|
こんにちは。
ものすごい知識をお持ちの先輩諸氏がいらっしゃるのでお助けくださいませんか。
無作為に選択した単一セル、連続するセル範囲、およびCTRLキーを利用して得た
複数セルの列番号を固定した列番号に変更したいのです。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(1, 1) = ActiveWindow.RangeSelection.Address
End Sub
具体的には、上のマクロを使ってそのシートのセルを選択すると、A1セルに、例えば
「$C$9,$B$5:$D$7,$A$6:$C$10,$A$12」と選択セルの番地を取得する事が出来ます。
これを
「$Z$9,$Z$5:$Z$7,$Z$6:$Z$10,$Z$12」のように全て「Z」列に変更して、
セル値の合計を出したいのです。
しかし、ストレートに
=SUM($Z$9,$Z$5:$Z$7,$Z$6:$Z$10,$Z$12) と計算式にしたのでは、
$Z$6、$Z$7、$Z$9が重複して計算されてしまうので、
=SUM($Z$5:$Z$10,$Z$12) とまるめた範囲としたいのです。
条件としては…
1.選択セルの数や選択のパターン(CTRL利用の有無など)は決まっていません。
2.選択範囲はC50からZ62です。
3.絶対番地でなくても良いです。
4.計算式入力のセルは操作者選択なので、Z列固定ですが行は決まっていません。
範囲まるめはだめとしても、列番号の変更だけでもお教え願えませんでしょうか。
よろしくお願いします。
|
|