コンピュータ・インターネットノウハウをみんなで自由に編集し合える!

Excel VBAで1行おき(1個とび、偶数行・奇数行)のセル数値の合計式記述 コンピュータ・インターネット


Excelで1行おき(1個とび、偶数行・奇数行)のセル数値の合計方法は、
以前調べて記事にしたのですが、
http://bubble2sei.blog69.fc2.com/blog-entry-1647.html
VBAでコードを記述する場合、
Cells(行, 桁).Text="=SUM(IF(MOD(ROW(C3:C6),2)=1,C3:C6,0))"
Cells(行, 桁).Value="=SUM(IF(MOD(ROW(C3:C6),2)=1,C3:C6,0))"
と記述してもエラーになります。
もしかしたら、マクロの記録でわかるかなと思い
上記の記事の操作を記録してみたらわかりました。

Cells(行, 桁).FormulaArray="=SUM(IF(MOD(ROW(C3:C6),2)=1,C3:C6,0))"
と記述すればOKです。。。。。hっ
関連ノウハウ

このノウハウを評価する

評価、コメントするにはサービスに登録してください。

サービス登録をする

コメントを見る

この記事を通報する

ノウハウを書く