Excel VBA質問箱 IV

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

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


15733 / 76738 ←次へ | 前へ→

【66480】Re:シート間の和
発言  かみちゃん  - 10/9/5(日) 22:40 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>A3〜B77セルという部分をfor構文にて表現したのですが、
>もし、もっと綺麗な表現方法があれば後学のためご教授ください。

For 〜 Next を使わなくても、以下のように処理することができます。

Sub SUM関数のあてはめ2()
 With ActiveWorkbook
  .Worksheets("合計").Range("A3:B77").Formula = "=SUM(" & .Sheets(2).Name & ":" & .Sheets(Worksheets.Count).Name & "!A3)"
 End With
End Sub

0 hits

【66461】シート間の和 ウータン 10/9/5(日) 5:55 質問
【66463】Re:シート間の和 UO3 10/9/5(日) 8:33 回答
【66467】Re:シート間の和 ウータン 10/9/5(日) 9:29 質問
【66468】Re:シート間の和 かみちゃん 10/9/5(日) 9:33 発言
【66479】Re:シート間の和 ウータン 10/9/5(日) 22:28 質問
【66480】Re:シート間の和 かみちゃん 10/9/5(日) 22:40 発言
【66481】Re:シート間の和 ウータン 10/9/5(日) 22:52 お礼
【66482】Re:シート間の和 かみちゃん 10/9/5(日) 22:54 発言
【66484】Re:シート間の和 ウータン 10/9/5(日) 23:05 お礼

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