Set WB = appExcel.Workbooks.Open("C:\PROJECTS\DATA\FEDEBOM\CREDENTIAL_MANAGEMENT\SEGREGATION_OF_DUTIES\WIP\CDSLookup_" & Format(Now(), "yyyymmdd") & ".xlsm") Open "C ...