Excel VBA質問箱 IV

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

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


64370 / 76732 ←次へ | 前へ→

【16943】Re:処理の繰り返しを教えてください。
回答  初心者 E-MAIL  - 04/8/16(月) 22:57 -

引用なし
パスワード
   こんばんわ。こんなのでどうでしょう??

Sub TEST()
  Cells(2, 3).Select
  ActiveCell.FormulaR1C1 = "=RC[-2]-RC[-1]"
  
  Do Until ActiveCell.Offset(, -1).Value = ""

  With ActiveCell
 .Offset(1).Select
  .Formula = "=RC[-2]-RC[-1]"

  End With
 Loop
 
End Sub


▼takenoko さん:
>このページを見つけ、凄い方々がいらっしゃるのだと驚きました。
>私の質問を聞いていただけたら幸いです。
>次のように列項目
>売上高 材料原価 付加価値
>10000  2000
>20000  2500
>30000  3000
>40000  3000 
>              がありこのようにレコードが数十行あります。
>
>隣の項目に付加価値(=売上高ー材料原価)を売上高の列に数字があるだけ
>マクロで計算させたいのです。つまり売上高、材料原価が空欄になるまで
>計算をさせたいのです。ただし、列数は変わりませんが毎回レコード数は変動します。
>何か良い案がありましたらご指導お願いいたします。
>
>
>
1 hits

【16941】処理の繰り返しを教えてください。 takenoko 04/8/16(月) 21:42 質問
【16943】Re:処理の繰り返しを教えてください。 初心者 04/8/16(月) 22:57 回答
【16975】Re:処理の繰り返しを教えてください。 takenoko 04/8/17(火) 21:56 質問
【16977】Re:処理の繰り返しを教えてください。 IROC 04/8/17(火) 22:30 回答
【16980】Re:処理の繰り返しを教えてください。 初心者 04/8/17(火) 23:44 回答
【16946】Re:処理の繰り返しを教えてください。 Asaki 04/8/16(月) 23:14 回答
【16950】Re:処理の繰り返しを教えてください。 IROC 04/8/17(火) 8:44 回答
【16976】Re:処理の繰り返しを教えてください。 takenoko 04/8/17(火) 22:30 質問
【16982】Re:処理の繰り返しを教えてください。 Asaki 04/8/17(火) 23:52 回答
【17016】Re:処理の繰り返しを教えてください。 takenoko 04/8/18(水) 20:46 お礼

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