コマンドボタンで起動するコードを作る-エクセルVBA抽選ソフト作成4

tyusencomopteyecatch

コマンドボタンで起動するコード(プロシージャー)を作ります。
今回はエクセルVBA抽選ソフト作成4になります。
単一的に実行させるのではなく、オプションボタンで指定したスタイルで実行の動作を可変させています。

こんにちは、じゅんぱ店長(@junpa33)です。

 

エクセルVBA抽選ソフト作成4では、

ユーザーフォーム「抽選NAVIGATOR」にあるボタンを押したときに起動するプロシージャーを作成します。

 

一つ前の記事を読み返すのはこちら↓になります。

tyusenuformeyecatch抽選作業を操作するユーザーフォーム作成-エクセルVBA抽選ソフト作成3

 

tyusentorisetueyecatch
イベント企画などでの抽選作業を、エクセルVBAを利用して簡単に進めて行きます。 無料でダウンロードできるエクセルVBA抽選ソフト【重複なし】です。 少人数参加から大人数まで対応します。記事内に説明書きあります。 こんにちは、じゅんぱ店長(@ ...
続きを読む
extyusenranhyoeyecatch
エクセルVBA抽選ソフトの作り方を紹介していきます。 初回の今回は、参加者を乱数表に落とし込むところまでです。 後々に、この乱数表(抽選表)を使って当選番号が決まっていきます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回から、 ...
続きを読む
tyusenjikkoueyecatch
エクセルVBA抽選ソフトの作成方法説明の2回目です。 今回はエクセルVBA抽選の実行コードを組み立て方を解説します。 抽選方法にバリエーションを設定していますので、抽選のイベント性がより高くなります。 こんにちは、じゅんぱ店長(@junpa ...
続きを読む
tyusenuformeyecatch
抽選作業を操作するためのユーザーフォーム作成を説明します。 今回はエクセルVBA抽選ソフト作成の3回目になります。 設置コントロールは多いですが、同じパターンで設置できます。 入力ミスに注意しましょう。 こんにちは、じゅんぱ店長(@junp ...
続きを読む
tyusencomopteyecatch
コマンドボタンで起動するコード(プロシージャー)を作ります。 今回はエクセルVBA抽選ソフト作成4になります。 単一的に実行させるのではなく、オプションボタンで指定したスタイルで実行の動作を可変させています。 こんにちは、じゅんぱ店長(@j ...
続きを読む
tyusenbackupeyecatch
ユーザーフォームに項目記入しても、一旦非表示にしてしまうと、 再表示時には、入力した項目がすべてクリアされていることにショックを感じます。 バックアップ対策で表示復旧を簡単に行えるようにします。 こんにちは、じゅんぱ店長(@junpa33) ...
続きを読む

 

 

コマンドボタンで起動するコード

 

ユーザーフォーム「抽選NAVIGATOR」上のコマンドボタンとオプションボタンについて、対応するするプロシージャーを作成します。

通常の作成パターンでは、ユーザーフォームのコマンドボタンクリックから、

フォームモジュールの記述によって、標準モジュールの実行プロシージャーへ

というパターンにすることがほとんどです。

今回は、実行プロシージャーの前に、同じ標準モジュールでも1クッションをかませます。

そしてその実行の前に、必要なそれぞれの識別記号を付加したコードを読み込むようにします。

 

  1. 「 抽選名称復旧」コマンドボタン
  2. 「抽選表SET」コマンドボタン
  3. 「抽選項目復旧」コマンドボタン
  4. 「抽選項目登録」コマンドボタン
  5. 「抽選項目更新」コマンドボタン
  6. 「抽選方法12か所」コマンドボタン
  7. 「抽選結果を保存」コマンドボタン
  8. 「イベントコントロール11か所」オプションボタン
  9. 「強制初期化」コマンドボタン

 

各プロシージャーに記述するコード

 

①「 抽選名称復旧」コマンドボタン

 

Module1に「抽選名称復旧」プロシージャーを記述します。

コード

Sub 抽選名称復旧()

    Set TYsheet = Worksheets("抽選会場")
    Set BUsheet = Worksheets("抽選項目BU")
    
    選定ナビ.抽選名称.Value = BUsheet.Range("B2")
    選定ナビ.参加人数.Value = BUsheet.Range("B3")
    選定ナビ.開催日付.Value = BUsheet.Range("B4")

End Sub

 

②「抽選表SET」コマンドボタン

 

Module1に記述した「クリアG」「応募者方眼紙」「応募者配置乱数」のプロシージャーを順に実行していきます。

乱数表(抽選表)を人数に合わせて作る-エクセルVBA抽選ソフト作成1

で解説しています。

 

③「抽選項目復旧」コマンドボタン

 

Module1に「抽選項目復旧」プロシージャーを記述します。

コード

Sub 抽選項目復旧()

    Dim Ans As Long
        Set TYsheet = Worksheets("抽選会場")
        Set BUsheet = Worksheets("抽選項目BU")
        
        Ans = MsgBox("抽選項目を復旧します。" & vbCrLf & "今の項目の場合は「はい」" & vbCrLf & _
            "一つ前の項目の場合は「いいえ」" & vbCrLf & "取りやめる場合は「キャンセル」" & vbCrLf & _
                " を押してください", vbYesNoCancel + vbExclamation, "復旧内容")
            
        If Ans = vbYes Then
                選定ナビ.一位賞.Value = BUsheet.Range("B5")
                選定ナビ.二位賞.Value = BUsheet.Range("B6")
                選定ナビ.三位賞.Value = BUsheet.Range("B7")
                選定ナビ.四位賞.Value = BUsheet.Range("B8")
                選定ナビ.五位賞.Value = BUsheet.Range("B9")
                選定ナビ.六位賞.Value = BUsheet.Range("B10")
                選定ナビ.一位本.Value = BUsheet.Range("C5")
                選定ナビ.二位本.Value = BUsheet.Range("C6")
                選定ナビ.三位本.Value = BUsheet.Range("C7")
                選定ナビ.四位本.Value = BUsheet.Range("C8")
                選定ナビ.五位本.Value = BUsheet.Range("C9")
                選定ナビ.六位本.Value = BUsheet.Range("C10")
        ElseIf Ans = vbNo Then
                選定ナビ.一位賞.Value = BUsheet.Range("B17")
                選定ナビ.二位賞.Value = BUsheet.Range("B18")
                選定ナビ.三位賞.Value = BUsheet.Range("B19")
                選定ナビ.四位賞.Value = BUsheet.Range("B20")
                選定ナビ.五位賞.Value = BUsheet.Range("B21")
                選定ナビ.六位賞.Value = BUsheet.Range("B22")
                選定ナビ.一位本.Value = BUsheet.Range("C17")
                選定ナビ.二位本.Value = BUsheet.Range("C18")
                選定ナビ.三位本.Value = BUsheet.Range("C19")
                選定ナビ.四位本.Value = BUsheet.Range("C20")
                選定ナビ.五位本.Value = BUsheet.Range("C21")
                選定ナビ.六位本.Value = BUsheet.Range("C22")
        Else
                Exit Sub
        End If

End Sub

ユーザーフォーム「選定ナビ」のテキストボックスのオブジェクト名が

デフォルトの昇順番号名のままであれば、For~Nextのステートメントを使って、

ここのコードはもう少し簡潔なコードにできると思います。

 

④「抽選項目登録」コマンドボタン

 

Module3に「抽選項目登録」プロシージャーを記述します。

Module3の書き始め

Module3はここで初めて使用しますので、

「挿入」から「標準モジュール」をクリックしてModule3を追加した後、

まず最初に変数の宣言を記述します。

宣言変数

  • PrN(1 To 6)・・・・ テキストボックスに入力された賞名
  • PrQ(1 To 6)・・・・ テキストボックスに入力された当選本数
  • PrQn(1 To 6)・・・・ 当選本数の値を数値型に変更
  • ST・・・・ 賞名番号
  • YN・・・・ 「単発」と「連続」の識別番号
  • OP・・・・ 単発抽選の抽選スピード識別番号
  • OPK・・・・ 単発抽選の点滅回数の識別番号
  • OPr・・・・ 連続抽選の抽選スピード識別番号
  • Jf・・・・ 重複メッセージのON・OFF識別番号
コード

Option Explicit

Public PrN(1 To 6) As String
Public PrQ(1 To 6) As Variant
Public PrQn(1 To 6) As Long
Public ST, YN, OP, OPk, OPr, Jf As Long

 

「抽選項目登録」プロシージャーを記述します。

宣言変数

  • h、i、j・・・・ カウンター変数

 

コードの内容は

  • テキストボックスの空欄対策
  • 変数に値を代入
  • テキストボックスに入力した内容を「抽選項目BU」シートにバックアップする
  • 文字列型の当選本数を数値型にデータ型変更する

です。

 

コード

Sub 抽選項目登録()
    Dim h, i, j As Long
        Set TYsheet = Worksheets("抽選会場")
        Set TOsheet = Worksheets("当選者")
        Set BUsheet = Worksheets("抽選項目BU")
        
        If TYsheet.Range("A1") = "" Then Exit Sub
        
        If 選定ナビ.参加人数.Value = "" Then
            MsgBox "抽選項目の入力が終わっていません。" & vbCrLf & _
            "参加人数は半角数字を入力してください。", vbOKOnly, "メッセージ"
            Exit Sub
        End If
            
        Call Module4.賞名空白対処
        
        TYsheet.Select
        Range("A5:A10", "C5:C10").ClearContents
        
        On Error Resume Next
        
        TItle = 選定ナビ.抽選名称.Value
        EVD = 選定ナビ.開催日付.Value
        Par = 選定ナビ.参加人数.Value
        PrN(1) = 選定ナビ.一位賞.Value
        PrN(2) = 選定ナビ.二位賞.Value
        PrN(3) = 選定ナビ.三位賞.Value
        PrN(4) = 選定ナビ.四位賞.Value
        PrN(5) = 選定ナビ.五位賞.Value
        PrN(6) = 選定ナビ.六位賞.Value
        PrQ(1) = 選定ナビ.一位本.Value
        PrQ(2) = 選定ナビ.二位本.Value
        PrQ(3) = 選定ナビ.三位本.Value
        PrQ(4) = 選定ナビ.四位本.Value
        PrQ(5) = 選定ナビ.五位本.Value
        PrQ(6) = 選定ナビ.六位本.Value
        
        On Error GoTo 0
            
        Call Module4.抽選項目バックアップ
        
        TYsheet.Select
        
        If Range("A1") <> "" Then
            For i = 1 To 6
                Range("A" & 4 + i) = PrN(i)
                PrQn(i) = Val(StrConv(PrQ(i), vbNarrow))
                Range("C" & 4 + i) = PrQn(i) - Range("B" & 4 + i)
        
            Next i
        End If
End Sub

 

MEMO

Val関数の使い方はこちらを参考にしてください。

VBAValeyecatchエクセルVBA Val関数の使い方「値を文字列型から数値型へ変換する」

StrConv関数の使い方

 

⑤「抽選項目更新」コマンドボタン

 

Module4に記述した「抽選項目バックアップ旧データ」「抽選項目更新」のプロシージャーを順に実行していきます。

Module4
項目のバックアップ、更新、当選リスト作成などはModule4で記述します。
次回の記事で解説していきます。

⑥「抽選方法12か所」コマンドボタン

 

Module3に「一位単ボタン」から「六位連ボタン」までプロシージャーを記述します。

抽選の実行プロシージャーに移る前に、2つの識別番号を付加します。

 

YN・・・・

「0」の時は単発抽選を選択、「1」の時は連続抽選を選択

 

ST・・・・

「1」の時は一位賞を抽選、「2」の時は二位賞を抽選、「3」の時は三位賞を抽選

「4」の時は四位賞を抽選、「5」の時は五位賞を抽選、「6」の時は六位賞を抽選

「一位単ボタン」プロシージャーの場合

コード

Sub 一位単ボタン()
    YN = 0
    ST = 1
    Call Module2.抽選会
End Sub

「一位連ボタン」プロシージャーの場合

コード

Sub 一位連ボタン()
    YN = 1
    ST = 1
    Call Module2.抽選会
End Sub

「5位連ボタン」プロシージャーの場合

コード

Sub 五位連ボタン()
    YN = 1
    ST = 5
    Call Module2.抽選会
End Sub

 

⑦「抽選結果を保存」コマンドボタン

 

Module4に「当選者リスト作成」プロシージャーを記述します。

Module4については次回の記事で紹介していきます。

 

⑧「イベントコントロール11か所」オプションボタン

 

Module3に「option1ボタン」から「option11ボタン」までプロシージャーを記述します。

 

オプションボタンが選択されたときに、それぞれの識別番号を付加します。

 

OP・・・・

「1」の時は500×0.3ミリ秒、「2」の時は300×0.3ミリ秒、「3」の時は150×0.3ミリ秒、「0」の時は500×0.2ミリ秒

 

OPk・・・・

「1」の時は5回、「2」の時は10回、「3」の時は20回、「0」の時は15回

 

OPr・・・・

「1」の時は300ミリ秒、「2」の時は200ミリ秒、「3」の時は100ミリ秒、「0」の時は250ミリ秒

 

Jf・・・・

「0」の時はメッセージを表示、「1」の時はメッセージを表示しない

 

コード

Sub option1ボタン()
    OP = 1
End Sub
コード

Sub option2ボタン()
    OP = 2
End Sub
コード

Sub option3ボタン()
    OP = 3
End Sub
コード

Sub option4ボタン()
    OPk = 1
End Sub
コード

Sub option5ボタン()
    OPk = 2
End Sub
コード

Sub option6ボタン()
    OPk = 3
End Sub
コード

Sub option7ボタン()
    OPr = 1
End Sub
コード

Sub option8ボタン()
    OPr = 2
End Sub
コード

Sub option9ボタン()
    OPr = 3
End Sub
コード

Sub option10ボタン()
    Jf = 0
End Sub
コード

Sub option11ボタン()
    Jf = 1
End Sub

 

⑨「強制初期化」コマンドボタン

 

Module1に「クリアS」を記述します。

乱数表(抽選表)を人数に合わせて作る-エクセルVBA抽選ソフト作成1

で説明しています。

 

コマンドボタンで起動するコードを作る まとめ

 

普通は、コマンドボタンを押せば、その直結している実行プロシージャーが起動することになります。

今回は、抽選実行のパターンが多かったり、オプションボタンでのバリエーションの選択肢があったりとそれぞれについて、

抽選実行前の条件整理を行えるようにコード組みを行いました。

Module3を使って、これらのコードを一まとめに管理できるようにしています。

 

次回は、抽選項目のバックアップと更新、当選者リストの保存についてです。

Module4に記述していきます。

 

エクセルVBAの独習を始めるためのポイントについて vbastudyeyecatchエクセルVBAを独学で習得するためのポイントは?良書との出会いは重要 基礎知識習得のためのオンライン学習講座の参考記事 Udemy1eyecatchエクセルVBA初級者がUdemyで動画学習する講座おすすめ5選と無料講座の上手な使い方。
  今回の記事はここまでです。
最後までご覧いただき有難うございました。

 

vbaintfixeyecatch
エクセルVBA関数で、数値の整数部分だけを分離します。 整数値取得のFix関数でなくInt関数の使用の場合でも、 他の関数との組み合わせで解決することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回のテーマは、数値の整 ...
続きを読む
vbarndeyecatch
エクセルVBAのRnd関数で乱数を取得します。 実用のためにはコードに簡単な加工をする必要があります。特に乱数値の整数化とRandomizeは必須です。 6.5兆通りのパスコードの生成方法も解説しています。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbaroundupdowneyecatch
エクセルVBA 数値の切り上げ、切り捨てをするときには注意しなければいけません。 RoundUp関数とRoundDown関数を使う時に負の数が混在していると、そのままだと誤った計算結果になることがあります。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbaroundeyecatch
エクセルVBAでも数値を四捨五入したい時は、Round関数を利用することが多いです。 Round関数の使い方はワークシートと同様ですが、ただ大きな注意点があります。 ここではその注意点も含めて使い方の説明を行います。 こんにちは、じゅんぱ店 ...
続きを読む
vbamaxminaveeyecatch
エクセルVBAで、ワークシート関数 Max・Min・Averageを利用して最大値・最小値・平均を求めます。 「簡単で短いエクセルVBAコード組み立て」を目指す上では、ワークシート関数は強い味方です。 こんにちは、じゅんぱ店長(@junpa ...
続きを読む
vbainsteeyecatch
InStr関数・InStrRev関数は、文字列操作系の関数の中でも最重要です。 この関数により指定の文字(列)の存在位置が取得できます。 そしてそれを目盛基準として、文字列操作をすることもできます。 こんにちは、じゅんぱ店長(@junpa3 ...
続きを読む
vbareplaceeyecatch
エクセルVBAで使える関数にReplace関数があります。 Replace関数は検索の文字列を指定の文字列に置換したり、削除したり出来ます。 利用価値の高い関数です。使い慣れておきましょう。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbaselectcaseeyecatch
エクセルVBAで、必須の条件文。 その中の一つで、Select Case 条件分岐 ステートメントの使い方を説明します。 簡単なコード、可読性の向上が特徴のステートメントです。是非、知っておきましょう。 こんにちは、じゅんぱ店長(@junp ...
続きを読む
VBAValeyecatch
エクセルVBAのVal関数の使い方についてです。 「値を文字列型から数値型へ変換する」という機能があります。 データ型が不一致の場合、プログラムエラーでコード停止が発生することが良くあります。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
VBAStringeyecatch
エクセルVBA String関数の使い方についてです。 「文字を指定した数だけ並べることが出来る」という機能の関数です。 この関数を使えば簡潔なコード記述で実行することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回は ...
続きを読む
vbajoineyecatch
エクセルVBAでJoin関数の使い方について説明します。 文字列を接続する関数ですが、 配列変数で文字列を要素化した時にはこれを使います。 また「区切り文字」も自由に設定できます。 こんにちは、じゅんぱ店長(@junpa33)です。 今回は ...
続きを読む
vbamideyecstch
エクセルVBAで文字列操作は、コード作成の中でも重要な部分です。 Mid・Right・Left関数は、その操作の中で重要な働きをする関数です。 文字列を切り出すこの関数の基本部分を説明します。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
vbatrimeyecatch
Trim・RTrim・LTrimは文字列の端にあるスペースを取り除きます。 ちょっとのことですが、取り込みデータにスペースが付いていることでのエラーは発見修正が結構厄介です。 注意が必要です。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
vbastrcstreyecatch
エクセルVBAで、Str関数とCStr関数に使い方とその違いについて説明します。 戻り値にちょっとした違いがあります。 使い方の違いでその後のコードの進行に影響が出ることがあり、なおざりにはできません。 こんにちは、じゅんぱ店長(@junp ...
続きを読む
vbaleneyecatch
Len関数の使い方ついて説明します。 エクセルVBAでプログラミングを行う時に、テキストデータを加工処理するには必須の関数です。 非常に有用な関数ですので、是非使えるようになっておきましょう。 こんにちは、じゅんぱ店長(@junpa33)で ...
続きを読む
VBACheckBoxeyecatch
エクセルシートで使う場合の、2種類あるチェックボックスの設置と使い方の違いを解説します。 一見簡単そうですが、 単純でない使い方をしたい時は、設置方法と設定方法を工夫する必要があります。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
VBAOptionbuttoneyecatch
エクセルで書類を作成する時、項目を選択できるようにするのがオプションボタンです。 これには2種類あり、使い方にかかわる違いもあります。 詳しいオプションボタン設置方法と使い方のコツを解説します。 こんにちは、じゅんぱ店長(@junpa33) ...
続きを読む
vbamojisousaeyecatch
エクセルVBAコードで、ファイルの保存時に名前を付けて保存について、その時の年月日を付けたい時の設定方法についてです。 保存されたファイルがたくさん増えて行く中で、ファイルの判別で年月日を付けている(付けたいと思っている)人も多いでしょう。 ...
続きを読む
vbajyufukueyecatch
今回は、同じ項目を一つにまとめるためのエクセルVBAコードを紹介します。 多数銘柄の商品を複数の店で扱っている場合、商品銘柄集計表を作るには、商品銘柄の種類だけをリストにしないといけません。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbafolderdeleteeyecatch
今回は、不要なフォルダをサクッと削除するエクセルVBAコードを紹介します。 削除の仕方は2つあります。VBA自身の機能を使うことと、FSOの機能を使うことの2つです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、不 ...
続きを読む
vbadirkilleyecatch
今回は、フォルダに保存されている要らないファイルを削除するエクセルVBAコードを紹介します。 フォルダを開いて一つずつファイル名を確認して、ではなくて、コード実行一発でササッと完了します。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
vbachdireyecatch
エクセルVBAのステートメントで「ChDir(チェインジディレクトリ)」というのがあります。 少々地味感のあるステートメントですが、この使い方のポイントを説明いたします。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAの ...
続きを読む
vbafindeyecatch001
今回は、データの検索方法で、エクセルVBAでできるメソッドについてです。 「FindとFindNextメソッド」の使い方と最速理解のコードの組み立て方を説明したいと思います。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルの検 ...
続きを読む
今回も、エクセルVBAで利用できるワークシート関数についてがテーマです。 この記事では、データナンバーなどから、その必要な値や数値を抽出する「Vloolup関数」について使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です ...
続きを読む
vbaindexeyecatch001
今回も、エクセルVBAで利用できるワークシート関数についてがテーマです。 この記事では、データリストから必要な値や数値を取り出してくる「Index関数」について使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセ ...
続きを読む
vbamatcheyecatch001
エクセルVBAで利用できる関数についてがテーマです。 今回は、データリストから必要な値や数値を取り出してくる「Match関数」について、使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAでよく使うワーク ...
続きを読む
vbahairetu3eyecatch
エクセルVBAで変数を利用するとき、二次元配列変数を知っていれば何かと便利なことがあります。 今回はそんな配列変数をより実際に近い例題で説明していきます。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAのプログラムでは、 ...
続きを読む
vbahairetu2eyecatch
エクセルVBAで配列を利用する時、それに関わる関数やステートメントを利用すれば、 より簡潔にコードを作成することが出来ます。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBA 配列を扱うときに利用できる関数とステートメント ...
続きを読む
vbahairetueyecatch
エクセルVBAで変数を利用するとき、複数の同じ型で変数を設定したいときがあります。 そんな時、出番となるのが配列変数ということです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAの1次元配列変数の使い方を説明します。 ...
続きを読む
vbabuttoneyecatch
エクセルVBAのプログラムを実行するのに、ワークシート上に設置したボタンのクリックでワンポチっとで行いたい。 そんなボタンの簡単設置方法を紹介します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、シートにマクロ(プ ...
続きを読む
vbasumeyecatch
エクセルVBAで、羅列された数値の集計作業をパパッと熟していきたいときがありますよね。 それを簡単に行える方法としてSUM関数があります。今回はこのSUM関数の使い方についてです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセ ...
続きを読む
vbainputboxeyecatch
エクセルVBAのプログラムで、利用者からの入力データを取り込んでコードを実行していくことがあります。 その簡潔な方法としてInputBoxがあります。今回はこのInputBoxの使い方についてです。 こんにちは、じゅんぱ店長(@junpa3 ...
続きを読む
vbalastcelleyecatch
エクセルVBAのプログラム作成で、入力データをその都度蓄積していく場合など、 既にデータの入っている最終セルの位置を調べたいという時が多くあります。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAのコード組み立てで、デー ...
続きを読む
vbawithstateeyecatch
エクセルVBAのコードの組み立てでは、視認性や可読性を上げるためにできるだけ記述を簡潔にしたいところです。 Withステートメントは、そういったコード記述を簡潔にする役割があります。 こんにちは、じゅんぱ店長(@junpa33)です。 エク ...
続きを読む
vbacleareyecatch
エクセルVBAでシートを再利用するために、一度内容すべてをクリアしたい時があります。 普通は、Clearメソッドを使ってクリア操作を行いますが・・・ こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAを組み上げる中で、シート ...
続きを読む
vbaoffseteyecatch
エクセルVBAで、セルやセルの選択範囲を移動させるのにOffsetプロパティがあります。 今回の「VBA最速で理解」は、この便利な「Offsetプロパティ」の使い方について説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エ ...
続きを読む
vbanameeyecatch
エクセルVBAで、アクティブセル、アクティブシート、アクティブブックという「現在参照中の・・・」というオブジェクトがあります。 今回の「VBA最速で理解」は、この「ActiveWorkbook」「ActiveSheet」「ActiveCel ...
続きを読む
vbaselacteyecatch
エクセルVBAで、そのコードを実行する先のオブジェクトに、フォーカスするためのメソッドに、「Select」と「Activate」があります。 今回は、このよく似た「Select」と「Activate」について説明します。 こんにちは、じゅん ...
続きを読む
vbavbekidoeyecatch
エクセルVBAを始めようとしたときに一番最初に戸惑うのが、「どうしたらVBAコードを書く表示画面になるのか?」だと思います。 今回は、この「どうしたら、その画面になるんだろう?」についての方法を説明します。 こんにちは、じゅんぱ店長(@ju ...
続きを読む
vbamsgboxeyecatch
エクセルVBAでユーザーフォームを使わなくても、簡単なユーザーとのやり取りならメッセージボックスでも可能です。 今回は、この「ユーザーへのメッセージや選択肢を提示する」ユーザーフォームについての説明をします。 こんにちは、じゅんぱ店長(@j ...
続きを読む
vbadoloopeyecatch
以前の記事でも書いたように、エクセルを使った業務で、「ループの処理」コードは重要な実行処理部分です。 今回は、このもう一つの「ループの処理」である「実行回数が限定されないループ処理」を行うコードについて説明します。 こんにちは、じゅんぱ店長 ...
続きを読む
vbafoldereyecatch
エクセルを使った業務で、「作成したファイルの保存」は作業の最後に必ず必要な部分です。 今回は、この「作成したファイルの保存」を行うための重要部分。保存先フォルダをVBAで指定する方法を説明します。 こんにちは、じゅんぱ店長(@junpa33 ...
続きを読む
vbasengeneyecatch
エクセルVBAのコード組み立てで使う変数。「この変数を使いますよ!」というのが「変数の宣言」です。 今回は、この変数の宣言についてです。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBA のコード組立ての中で、変数の宣言は ...
続きを読む
vbaifjyokeneyecatch
エクセルVBAのコード組み立てで最も必要な、最もよく使うメソッドの1つで「If~Then~Else」があります。 今回はこの「If~Then~Else」メソッドについて設定条件の絞り方のポイントを説明します。 こんにちは、じゅんぱ店長(@j ...
続きを読む
VBACopyeyecatch
エクセルVBAのコード組み立てで、よく使うメソッドの1つで「Copy」メソッドがあります。 今回はこの「Copy」メソッドの使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルVBAで、ワークシートのコピーをを ...
続きを読む
VBAGotoeyecatch001
エクセルVBAのコードで、Gotoステートメントは嫌われ系のグループにはいっています。 それでも、GotoがあるのでVBAコード組み立てがスムーズに、楽に、なる事も多いと言うのも事実です。 こんにちは、じゅんぱ店長(@junpa33)です。 ...
続きを読む
fornextirekoeyecatch
エクセルVBAのコード組み立てで、非常によく使うステートメントの一つにFor~Nextでのループ処理があります。 今回はこのFor~Nextステートメントの使い方を説明します。 こんにちは、じゅんぱ店長(@junpa33)です。 エクセルV ...
続きを読む

 

<記事内容についての告知>VBAコードの記述記事においては、その記述には細心の注意をしたつもりですが、掲載のVBAコードは動作を保証するものではりません。 あくまでVBAの情報の一例として掲載しています。 掲載のVBAコードのご使用は、自己責任でご判断ください。 万一データ破損等の損害が発生しても当方では責任は負いません。

 

  エクセルVBAをはじめから学ぶための参考書 おすすめの一冊
Excelマクロ&VBA超入門 今すぐ使えるかんたんぜったいデキます!
エクセルVBAを初めて勉強するときに効く
vbastudy016a
vbastudy017a

「Excelマクロ&VBA超入門」をamazonで見てみる

(著者)井上香緒里
(出版社)技術評論社
(税込価格)1,738円(本体1,580円+税)
マクロとVBAについて学んでみたいけれど,いまひとつ自信がないという方のために,ひとつひとつの操作を丁寧に解説する1冊目の教科書です。
目次一覧
第1章 マクロ基本編―マクロの基本を学ぼう
第2章 マクロ作成編―記録マクロを作ろう
第3章 マクロ修正編―記録マクロを修正しよう
第4章 ボタン作成編―マクロをボタンに登録しよう
第5章 マクロ応用編―シートをコピーするマクロを作ろう
第6章 VBA実践編―VBAでプログラムを書いてみよう
第7章 フォーム作成編―フォームを作ってみよう
第8章 困った解決編―マクロ&VBAの困った!を解決しよう
タイトルにもありますようにエクセルVBA「超入門」の参考書です。
エクセルVBAの「い・ろ・は の い」から説明していますので、安心して取り組める参考書です。
一つ一つの基本の操作を分かり易く解説しています。”ムチャクチャわかるレベル”の入門書ですので、読破時間が非常に短くなると思います。
反復学習して行く内に、段々読み返すのがばかばかしくなりますが、それはエクセルVBAの「い・ろ・は の い」は理解できたという証拠でもあります。
例題として、
  • 「データ消去」「シートのコピー」「メッセージボックス」の機能を持つお小遣い帳
  • 「入力フォーム」の機能を持った歩数表
2つの題材ファイルを作成しながら,マクロとVBAの基本を学習していきます。