Need help updating sheets name to look into workbook VBA

[zone709]

Hi so I run this macro in my workbook now, but I need to change this now to look into a different workbook called "Time" sheet name --->Sheets("Name Correction"). I need to add to all of these below to look at this sheet name but in a different book called Time--> Sheets("Name Correction"). Any help thanks

Sub ChangeNamesForTimesheetAlphCorrection() 'Change names in Column to map names for timesheet New'
Application.ScreenUpdating = False
Dim i As Long
Dim b As Long
Dim c As Long
Dim Lastrow As Long
Dim LastRowA As Long
Windows("FIle Zed Upload For Time Macro 2.xlsm").Activate
Lastrow = Sheets("Data (2)").Cells(Rows.count, "B").End(xlUp).Row
LastRowB = Sheets("Name Correction").Cells(Rows.count, "A").End(xlUp).Row
    For i = 1 To Lastrow
        For b = 1 To LastRowB
            If Sheets("Data (2)").Cells(i, 2).Value = Sheets("Name Correction").Cells(b, 1).Value Then
                Sheets("Data (2)").Cells(i, 2).Value = Sheets("Name Correction").Cells(b, 2).Value
            End If
        Next
    Next
Application.ScreenUpdating = True
End Sub