Цикл через файл Excel в VBA

Question

Мне нужно прочитать файл Excel, а затем l oop по каждой строке в файле, извлечь определенные значения из определенных столбцов и добавить их в новый файл Excel. Файл, который я должен был прочитать, имеет 37 строк и 26 столбцов. Обычно я хочу искать слово «Комментарий» в каждом отдельном столбце строки, в которой я сейчас нахожусь. Если я нахожу это слово, я хочу напечатать определенные столбцы строки в новом файле. Как мне прочитать, l oop через, создать новый файл excel, а затем записать в него?

У меня есть отправная точка, но ее не так много

Private Sub UploadData_Click()

    Dim myWorkbook As Excel.workbook
    Dim myWorksheet As Excel.worksheet
    Dim varArray As Variant
    Dim i As Integer
    Dim j As Integer
    ReDim varArray(37, 26)
    
    Set myWorkbook = Workbooks.Open(Me.Text47)
    Set myWorksheet = myWorkbook.Worksheets(1)
    
    For i = 1 To 37
    For j = 1 To 26
        varArray(i, j) = Worksheets(Me.Text47).Cells(i, j).Value
        Next
        Next
        
End Sub