I am having a brain fart. This is the line that is failing. 

'a=workbook location

a.Columns.AutoFit
I have tried a.column.autofit
a.Entirecolumn.autofit
a.workbook.column.autofit
a.column().autofit
a.columns().autofit
a.column("A:ZZ").autofit

I had it working earlier and deleted that line and can't figure out what I had that worked. I know it wasn't a With/If