Sub Excel入力()
Dim a As Integer
a = 1
Do Until Cells(a, 1).Value = “”
Cells(a, 2).Value = “Excel”
a = a + 1
Loop
End Sub
続きを読む
カテゴリー別アーカイブ: Excel
繰返し処理と変数の使い方②
A列が空白になるまで、④と⑤の処理を繰り返します。
④は Cells(a, 2).Value = “Excel” です。
aは②でa=1としているので、Cells(a, 2)は、Cells(1, 2) つまりB1です。
B1に”Excel”という値を代入します。
⑤で a = a + 1 で、a=2となります。
そして③に戻ります。今度Cells(a, 1)は、Cells(2, 1) つまりA2です。
A2は空白ではないので、また④と⑤の処理を繰り返します。
aは2なので、Cells(a, 2)は、Cells(2, 2) つまりB2です。
B2に”Excel”という値を代入します。
⑤で a = a + 1 で、a=3となります。
また③に戻ります。今度Cells(a, 1)は、Cells(3, 1) つまりA3です。
A3は空白ではないので、また④と⑤の処理を繰り返します。
aは3なので、Cells(a, 2)は、Cells(3, 2) つまりB3です。
B3に”Excel”という値を代入します。
⑤で a = a + 1 で、a=4となります。
・・・・
⑤で a = a + 1 で、a=10となります。
また③に戻ります。今度Cells(a, 1)は、Cells(10, 1) つまりA10です。
A10は空白ではないので、また④と⑤の処理を繰り返します。
aは10なので、Cells(a, 2)は、Cells(10, 2) つまりB10です。
B10に”Excel”という値を代入します。
⑤で a = a + 1 で、a=11となります。
また③に戻ります。今度Cells(a, 1)は、Cells(11, 1) つまりA11です。
A11は空白なので、条件を満たしたので繰返し処理は終わりです。
これが演算処理の概要です。
aがどのように変化し、どのセルを参照しているのかしっかりと追って下さい。
繰り返し処理と変数の使い方①
前回、セルの操作方法を解説しました。
セルの指定方法は、
A2→Cells(2,1)
B1→Cells(1,2)
というように、恐らく印象としては通常と行と列が逆だと感じます。
ですので、先に行、後で列 と覚えて下さい
今回は繰り返し処理と変数を解説します。
図のようにA1~A10に1,2,3,・・・10と数字を入れてください。
この数字のあるセルのB列に「Excel」という文字を入れていきます。
Sub Excel入力()
① Dim a As Integer
② a = 1
③ Do Until Cells(a, 1).Value = “”
④ Cells(a, 2).Value = “Excel”
⑤ a = a + 1
⑥ Loop
End Sub
まず最初に変数の使い方ですが、
①でこれから「a」という変数を使うと宣言します。
変数には、数値型、テキスト型等いろいろあり、さらに数値型にも何種類か
型がありますが、変数の宣言の仕方は
Dim 変数の名前 As Integer
これだけ覚えて下さい。
そして②で初期値として変数aの値を「1」とします。
③の意味は、Cells(a,1)はA列です(列を1で固定しているため)。
日本語に訳すと、
実行しなさい、A列が空白になるまで
です。
何を実行するかというと、③Do untilと⑥Loopの間に挟まれた処理です。
つまり④と⑤を実行します。
とりあえず今回はここまで。
ExcelVBAで簡単なプログラムを書いてみよう!
前回ExcelVBAのプログラムの書く場所について解説しました。
では実際にプログラムを書いてみましょう。
今回は、セルA1に1を入力するプログラムを書きます。
では、開発タブからVisualBasicをクリックし、VBE(Visual Basic Editor)を起動します。
そして次のコードを入力します。マクロのタイトル以外は全て半角で入力して下さい。
Sub 文字入力()
Cells(1, 1).Value = 1
End Sub
前回のように、開発タブのマクロから実行する方法もありますが、次の方法でマクロを実行します。
これで、A1に1が入力されました。
少しCells(1,1)の数字を変更してみて、どう動くか確認してみて下さい。
それから、A1に入力する文字が数字でなくテキスト形式の場合は次のように記述します。
Cells(1, 1).Value = “三浦健二郎”
入力する値がテキスト形式のときは、半角のダブルコーテーションで囲みます。
次のメッセージが表示されたときは、コンテンツの有効化をクリックして下さい。そうすればマクロが動きます。
マクロを使ったファイルを保存するときは、保存方法にも注意して下さい。
「マクロ有効ブック」にして保存しないと、入力したVBAコードは消えてしまうのでご注意ください!!!
ExcelVBAの書き方の第一歩
ExcelVBAにはコードの書き方に決まりがあります。
最初の一行目は、
Sub ○×()
と記述します。ちなみに○×はこのマクロの名前ですので、分かりやすい名前を
ご自由につけて下さい。
ちなみに「Sub」 と 「()」 は必ず半角にして下さい。
続きを読む
ExcelVBAを使う下準備
ExcelVBAを使うには下準備が必要です。
先に開発タブを表示できるようにします。ファイルタブをクリックし、オプションを選択します。
ここで、リボンのユーザー設定をクリックし、「開発」にチェックを付けます。
続きを読む
ExcelVBAを使う上で大事なことは4つだけ
前回いきなりVBAのコードを記述しました。
前回記述したコードは、会計ソフトのフォーマットに変換する
基礎中の基礎のプログラムです。
ExcelVBAの参考書を読むと、いろいろな関数がでていますが、使うのは
①Cells(a,b)というセルの指定の仕方
②IF関数
③繰り返し処理のDo Until ~ Loop
④変数の使い方
以上の4つです。
続きを読む