• 締切済み

Excel VBA「プログラミング基礎」について困っています。

問題1 1、1+2、1+2+3、1+2+3+4、・・・、1+2+3+・・・+100までの結果をセルの行方向に表示 問題2 1から100までの2乗の答えを列方向に表示する。 問題3 1から100までを各セルに表示させていく。行方向に表示させるが、 10で割り切れる数を表示したら、改行すること。(modを使う) 問題4 1から100までの数の中で、3の倍数が何個あるか (modを使う。割り切れたら変数にカウント) ひとつでもいいのでこの問題達の命令文を 教えていただきたいです。 お願いします。 自分で買ったテキストを読んでも わからない文字ばっかりでわからなくなってしまいました。 お願いします。

みんなの回答

  • mc-aumsc
  • ベストアンサー率32% (9/28)
回答No.1

自分には上の2つしか分からないので、それだけ…。 自分なりの解答なので、もっといいやり方があるかもしれません。 あくまでも一例です。 問題1 Dim i As Integer Range("A1")=1 For i=2 To 100 Cells(i,1)=Cells(i-1,1)+i Next i <簡単な解説> 1行目は変数の宣言(iが変数になる) セルA1に1を代入 For ~ Nextはループの命令文で、変数iが2からスタートして100になるまで、For ~ Next間の命令文を繰り返す。 Cellsはセル番地を行番号、列番号で指定する Cells(i,1)はi(変数なので、数が変わります)行目と1列目のセル番地を表す。 問題2 Dim i As Integer For i=1 To 100 Cells(1,i)=i^2 Next i 問題1とやり方は変わりません。 ただ、今度は列方向での表示なので、Cells(i,1)ではなく、Cells(1,i)と変数の位置が変わっています。

1012chaa
質問者

お礼

質問に答えていただいた上解説までつけていだだき ありがとうございます★! 解説、とてもわかりやすいです。 ありがとうございました!!

関連するQ&A