Excel VBA - アドインモジュールでワークシートイベントを使用するには？

Question

私はExcelアドインを初めて使用しており、mi programmの書き方がわかりません。 アドインを使用するブックを開くと、「mainSheet」という名前のシートが作成されるように、アドインにコードを追加します。

ワークブックでイベントハンドラを使用できますが、コードをアドインのモジュールに入れて実行することは可能ですか？

Answer 1

"Automate Excel" Webサイトでこれが見つかりました。これが役立つことを願っています

次のコードはブックを開くときに機能します。自動的に新しいシートを追加し、そのシートに名前を付けます。シートがまだ存在していないことを確認して、1日に1回以上開くことができるようにします。

このコードは、ワークブックを開き、イベントを利用し、は「オープン作業帳」イベントの下ワークブックモジュールに配置する必要があります。機能Sheet_Existsは、モジュール内に配置され、これはシートが存在するか否かをチェックしなければならない：

Private Sub Workbook_Open() 

Dim New_Sheet_Name As String 

New_Sheet_Name = "mainSheet" 

If Sheet_Exists(New_Sheet_Name) = False Then 
    With Workbook 
     Worksheets.Add().Name = New_Sheet_Name 
    End With 
End If 

End Sub 

==を

Function Sheet_Exists(WorkSheet_Name As String) As Boolean 

Dim Work_sheet As Worksheet 

Sheet_Exists = False 

For Each Work_sheet In ThisWorkbook.Worksheets 
     If Work_sheet.Name = WorkSheet_Name Then 
     Sheet_Exists = True 
    End If 
Next 

End Function