Excel VBA質問箱 IV

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

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


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

74424 / 76732

←次へ　｜　前へ→


	【6775】Re:選択セルの列番号を指定列番号に変更したい

よろずや - 03/8/3(日) 17:46 -


	引用なし

	パスワード

>「$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) とまるめた範囲としたいのです。
こんな感じで。

　　With Application
　　　　Cells(1, 1) = .WorksheetFunction.Sum(.Intersect(Target.EntireRow, Columns("Z")))
　　End With

0 hits

▼

【6770】選択セルの列番号を指定列番号に変更したい 初心者プラス1歩 03/8/3(日) 12:50