VBA Code Save When Switching Windows

[jbeck08]

Currently, we have a macro that stops and forces you to save the file when it switches between windows. We'd like it to be able to run all the way through without forcing this save option, any help on resolving this issue would be greatly appreciated. I've attached a portion of the VBA code and bolded the section that is forcing the issue.

Cells.Select
Range("M22").Activate
Cells.EntireColumn.AutoFit
Selection.ColumnWidth = 9.78
Cells.EntireColumn.AutoFit
Application.CutCopyMode = False

ChDir "J:\Macro Save As Files"
ActiveWorkbook.SaveAs Filename:="J:\Macro Save As Files\Taxability Test.xlsx" _
, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Range("M22").Select
Windows("monthlysales.xls").Activate
Range("C3").Select
ActiveCell.FormulaR1C1 = "ST"

 

[jondavis1987]

Is the workbook you're in when you try to run this the taxability test? Because if so it may be easier to just do a save instead of a save as. Because my guess is it is stopping because it's now trying to replace a file

 

[jondavis1987]

If it isn't the same workbook you could try putting this in there

Application.DisplayAlerts = False

[COLOR=#333333]Cells.Select[/COLOR]
[COLOR=#333333]Range("M22").Activate[/COLOR]
[COLOR=#333333]Cells.EntireColumn.AutoFit[/COLOR]
[COLOR=#333333]Selection.ColumnWidth = 9.78[/COLOR]
[COLOR=#333333]Cells.EntireColumn.AutoFit[/COLOR]
[COLOR=#333333]Application.CutCopyMode = False
Application.DisplayAlerts = False
[/COLOR]
[B][COLOR=#000000]ChDir "J:\Macro Save As Files"[/COLOR]
[B][COLOR=#000000]ActiveWorkbook.SaveAs Filename:="J:\Macro Save As Files\Taxability Test.xlsx" _[/COLOR]
[B][COLOR=#000000], FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False[/COLOR]
Range("M22").Select
Windows("monthlysales.xls").Activate
Range("C3").Select
ActiveCell.FormulaR1C1 = "ST"[/B][/B][/B]