Skip to main content

ExcelVBA追加課題

追加課題ではとある管理表から請求書を規定のテンプレートに従って自動発行するプログラムを作成します
今まで学習した内容だけでは実装できないので、必要だと思うことは適宜調査しましょう

追加課題説明動画リンク

上記の動画を視聴し後、以下のリンクから必要ファイルをダウンロードして下さい
zip形式でダウンロードされますので、展開して使用して下さい

必要ファイル

tip

この課題では「シートの参照」という処理が必須です
イメージとしては変数に特定シートを参照させ、その変数からシートに対する以下の様な操作を行うことになります

  • 特定セルの値を取得
  • 特定セルに値を出力

今までの以下のような記述では、「どのシートの」A1セルの値かが特定できません

Range("A1").value

これを解決するには以下のようにシートオブジェクトを変数に代入し、「どのシートの」という情報を明示的に指定します

Dim sheet1 As Worksheet
Set sheet1 = Worksheets(1) ' 特定のシート
sheet1.Range("A1").Value

上記と同じ様な考え方で「どのブックの」という情報を指定することも可能です
Excelファイルを横断しなければならない処理であれば必ず使用することになります