尝试从Excel中的表格自动创建新工作表

Question

我刚刚开始使用VBA，但终生无法使用它。所以，这就是我想要做的：

每次在“项目”工作表的“ tblProjects”表中添加新条目时，都会使用“项目模板”工作表作为模板来创建与该条目同名的新工作表。 “项目”表。并且“项目名称：”下的条目还将提供指向该工作表的链接。

其他列中的信息-“类型：”，“校园：”，“领导者”，“开始日期：”-已经在项目的新表中填写。以及工作表的名称

这是我到目前为止所拥有的：-当然没有任何作用。

Sub addNewSheet()

    Dim Projects As Worksheet
    Dim xl As Excel.Application
    Dim wb As Workbook

    Set xl = New Excel.Application
    Set wb = ThisWorkbook
    Set Projects = wb.Worksheets(“Projects”)
    
    For Each cell In Data.ListObjects.Item("tblProjects").ListColumns("Sheet Created:").DataBodyRange
        If (cell.Value = "Yes") Then
            Sheets.Add
        End If
    Next cell