VBAコードを書く前に書いておくコード汎用テンプレ

汎用テンプレで記憶の壁をぶち破る

まあ、VBAを毎日書いているような開発者は、VBAコーダーのほんの一握りなわけです。大半は、デスマーチと化した社内業務をサクッと効率よく、正確にやって、クールないい気分に浸りたいわけですよ。となると、一度VBAを書いても、当たり前のようにすぐ忘れてしまんですね。そこで、テンプレをどこかに置いておいて、それ以外のところを調べて、コーディングを行います。そこで、いつも使う私のVBAテンプレを貼っておきます。

私の汎用テンプレ（VBA）

Option Explicit '変数は必ず宣言
Sub テンプレ()

'画面遷移をなくす
'Application.ScreenUpdating = False

'よく使う変数
Dim i As Long
Dim lstRow As Long
Dim lstColumn As Long
Dim path As String
Dim a as Valiant

'最終行、最終列の取得
lstRow = ThisWorkbook.Sheets("前月").Cells(Rows.Count, 1).End(xlUp).Row
lstColumn = ThisWorkbook.Sheets("前月").Cells(1, Columns.Count).End(xlToLeft).Column

'繰り返し処理　for文
For i = lstRow1 To 1 Step -1
    
Next

'ケース文
Select Case a

    Case Is <= 0
                       
    Case Is <= 10
                         
    Case Else

End Select

'フォルダからファイル選択してパスを取得
path = Application.GetOpenFilename

'ファイルを保存する
ActiveWorkbook.SaveAs _
  FileName:="C:\Users\user\Documents\保存ファイル", _
  FileFormat:=xlOpenXMLWorkbookMacroEnabled

'画面遷移を戻す
Application.ScreenUpdating = True