我一直在编写一个代码,打开E列中列出的文件列表,然后我做了一个循环来查看哪些工作正常。
但是,现在我需要在第一个循环中使用一个循环来检查每个打开的文件上是否有A列上的每个名字。我将衷心感谢您的帮助!感谢
Sub teste()
Dim myRng As Range
Dim myCell As Range
Workbooks("TIME_SHEET_MACRO").Activate
With Worksheets("Base de dados")
Set myRng = .Range("E1", .Cells(.Rows.Count, "E").End(xlUp))
For Each myCell In myRng.Cells
If .Cells(myCell.Row, "E").Value <> "" Then
Workbooks.Open (myCell)
Workbooks("TIME_SHEET_MACRO").Activate
Worksheets("Base de dados").Activate
End If
Next myCell
End With
End Sub