This code "works" however it will copy over the formulas, I need it to only copy the values. Most of the threads say to do .PasteSpecial xlPasteValues, as you can see I did that below . I am working in two separate workbooks. Am I missing something? TIA!!
Application.DisplayAlerts = False
Set wb = ActiveWorkbook
VBA.SetAttr "L:\Documents\LCopy_Live File_Test.xlsx", vbNormal
Set wb2 = Workbooks.Open("L:\Documents\Copy_Live File_Test.xlsx")
wb2.Sheets("Sheet1").Range("A1:BG10000").Delete
wb.Sheets("Schedule").Range("A1:BG10000").Copy
wb2.Sheets("Sheet1").Range("A1").PasteSpecial xlPasteValues
wb2.Sheets("Sheet1").Range("A1:BG10000").Columns.AutoFit
wb2.Save
wb2.Close
VBA.SetAttr "L:\Documents\Copy_Live File_Test.xlsx", vbReadOnly
Application.DisplayAlerts = True
Application.DisplayAlerts = False
Set wb = ActiveWorkbook
VBA.SetAttr "L:\Documents\LCopy_Live File_Test.xlsx", vbNormal
Set wb2 = Workbooks.Open("L:\Documents\Copy_Live File_Test.xlsx")
wb2.Sheets("Sheet1").Range("A1:BG10000").Delete
wb.Sheets("Schedule").Range("A1:BG10000").Copy
wb2.Sheets("Sheet1").Range("A1").PasteSpecial xlPasteValues
wb2.Sheets("Sheet1").Range("A1:BG10000").Columns.AutoFit
wb2.Save
wb2.Close
VBA.SetAttr "L:\Documents\Copy_Live File_Test.xlsx", vbReadOnly
Application.DisplayAlerts = True