VBAテンプレート ファイルを順番に開いて操作する

VBAテンプレート

自分用です。
Excelにパスを記載したファイルを上から順番に開いて、処理を実施します。
処理部分は記載していません。

Excelシート
「ファイル一覧」シートを作成
下記の表を作成します。
A列：操作の要否（操作不要なら×を記載）
B列：操作したいファイルのパス
C列：操作の成功可否を記載するセル

Moduleは2つ作成します。

Module1
ファイルを開き処理を実施する関数を呼び出す

Sub OpenFile()
'Application.ScreenUpdating = False
Dim ファイル一覧シート As Variant
Set ファイル一覧シート = ThisWorkbook.Sheets("ファイル一覧")
Dim 操作ブック As Workbook
Dim 結果 As Boolean

On Error GoTo エラー

For filei = 2 To ファイル一覧シート.Range("B10000").End(xlUp).Row

ファイル一覧シート.Range("C" & filei).Value = "未処理"

 If Not ファイル一覧シート.Range("A" & filei).Value = "×" Then
    Workbooks.Open ファイル一覧シート.Range("B" & filei)
    Set 操作ブック = ActiveWorkbook
    結果 = ファイル操作(操作ブック)
    操作ブック.Close SaveChanges:=False
    ファイル一覧シート.Range("C" & filei).Value = 結果
  End If
  GoTo skip

エラー:
    ファイル一覧シート.Range("C" & filei).Value = "ファイル開かず"
skip:
Next
End Sub

Module2
処理を記述

Function ファイル操作(ByRef 操作ブック As Workbook) As Boolean

On Error GoTo エラー

'好きな処理を記載




ファイル操作 = True
Exit Function

エラー:
ファイル操作 = False

End Function