「列挙型変数Enumの使い方」配布資料＆配信アーカイブ

第2回和風スパゲティ勉強会「VBEの使い方大全」

2025年4月12日(土)21:00～「第2回和風スパゲティ勉強会」を開催いたしました！
ご参加いただいた皆さまありがとうございました(´∀｀)

第2回のテーマは「列挙型変数Enumの使い方」ということで、
Enum変数を使った超高効率なCells指定法を解説しました。

本日のお品書き

' 販売データ
Public Const R1st販売データ = 5
Public Enum CNo販売データ
    First = 2
    No = First
    取引先コード
    取引先名
    取引先種別
    販売日
    商品コード
    商品名
    商品種別
    価格
    個数
    売上
    領収書出力
    Last = 領収書出力
End Enum

' 転記処理
WS抽出データ.Cells(R_出力, CNo抽出データ.No) = WS販売データ.Cells(R_読取, CNo販売データ.No)
WS抽出データ.Cells(R_出力, CNo抽出データ.販売日) = WS販売データ.Cells(R_読取, CNo販売データ.販売日)
WS抽出データ.Cells(R_出力, CNo抽出データ.商品コード) = WS販売データ.Cells(R_読取, CNo販売データ.商品コード)
WS抽出データ.Cells(R_出力, CNo抽出データ.商品名) = WS販売データ.Cells(R_読取, CNo販売データ.商品名)
WS抽出データ.Cells(R_出力, CNo抽出データ.価格) = WS販売データ.Cells(R_読取, CNo販売データ.価格)
WS抽出データ.Cells(R_出力, CNo抽出データ.個数) = WS販売データ.Cells(R_読取, CNo販売データ.個数)
WS抽出データ.Cells(R_出力, CNo抽出データ.売上) = WS販売データ.Cells(R_読取, CNo販売データ.売上)