Excel VBA質問箱 IV

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

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


3453 / 76735 ←次へ | 前へ→

【78912】For-Next
質問  トキノハジメ  - 17/2/22(水) 20:28 -

引用なし
パスワード
   いつもお世話になります。

下記のコードを For-Next にするどうすれはよいかおしえてください。

宜しくお願い致します。 

  Range("D9").Value = Range("D7").Value - Range("D8").Value
  Range("E9").Value = Range("E7").Value - Range("E8").Value
  Range("F9").Value = Range("F7").Value - Range("F8").Value
  Range("G9").Value = Range("G7").Value - Range("G8").Value
  Range("H9").Value = Range("H7").Value - Range("H8").Value
  Range("I9").Value = Range("I7").Value - Range("I8").Value
  Range("J9").Value = Range("J7").Value - Range("J8").Value
  Range("K9").Value = Range("K7").Value - Range("K8").Value
  Range("L9").Value = Range("L7").Value - Range("L8").Value
  Range("M9").Value = Range("M7").Value - Range("M8").Value
  Range("N9").Value = Range("N7").Value - Range("N8").Value
  Range("O9").Value = Range("O7").Value - Range("O8").Value
  Range("P9").Value = Range("P7").Value - Range("P8").Value
  Range("Q9").Value = Range("Q7").Value - Range("Q8").Value
  Range("R9").Value = Range("R7").Value - Range("R8").Value
  Range("S9").Value = Range("S7").Value - Range("S8").Value
  Range("T9").Value = Range("T7").Value - Range("T8").Value
  Range("U9").Value = Range("U7").Value - Range("U8").Value

1 hits

【78912】For-Next トキノハジメ 17/2/22(水) 20:28 質問[未読]
【78914】Re:For-Next β 17/2/22(水) 21:29 発言[未読]
【78918】Re:For-Next トキノハジメ 17/2/23(木) 8:53 お礼[未読]

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