エクセル（Excel）の技。知ってましたか・・・。

マイクロソフトアクセスの記事はこちら

人気ブログランキングへ




にほんブログ村



コマンドボタンの追加



今度はコマンドボタンを追加してみましょう。

テキストボックスを追加したように「コマンドボタン」を押して、

ユーザーフォームに配置します。



上記のようにコマンドボタンが追加されました。

プロパティウィンドウも「CommandButton1」になっていますね。

「Caption」のところで名前の変更が出来ます。

とりあえず「入力」としてみましょう。



上記のように「入力」という名前に変わりました。

ここで少しVBAを書いてみましょう。

「テキストボックス１」に入力した内容を、「コマンドボタン」を押すことにより、

Excelシート４のA1にテキストボックス１の内容を転記する。

というプログラムを作ってみましょう。



まず、プログラムを書くところは「コマンドボタン」に記載するため、

コマンドボタン上で右クリックし、メニューから「コードの表示」を選択します。



上記のようになり

Private Sub CommandButton1_Click()

End Sub

という記述が自動的に記述されます。

この２行の間にプログラムを書いて行きます。

Private Sub CommandButton1_Click()

Sheets("sheet4").Range("A1") = UserForm1.TextBox1

End Sub

上記のように「Sheets("sheet4").Range("A1") = UserForm1.TextBox1」と記載しました。

ここの記載方法は色々あります。

Private Sub CommandButton1_Click()

Sheets("sheet4").Range("A1").Value = UserForm1.TextBox1

End Sub

上記のように「.Value」でも同じ動作を行います。

たぶん「.Value」を記載するのが正統なのだろうと思います。

このように同じ動作をさせる場合でも、記述の方法は色々な記述方法があります。

そこは各人のＶＢＡの習得レベル・センス等によると思います。

いかに分かりやすく、簡潔に記述できるかだと思います。

私のように「仕事で少々ＶＢＡを使ってますよ」というレベルではこれで十分だと思っています。




WordPressが簡単・すぐに使える『レンタルサーバーheteml(ヘテムル)』