entirecolumn.autofit

[patrickmuldoon99]

Hey all

I run entirecolumn.autofit on a number of sheets of mine, but it takes absolutely ages to do the job. Screen Updating is off, calculations are manual (if either matter) - does anyone know what may be taking so long - is it a notoriously long process running thru VBA?

 

[lozzablake]

How is your code structured? It shouldn't take that long!

 

[patrickmuldoon99]

It uses a for each structure, using an object s

for each s in sheets
entirecolumn.autofit
next s

and it takes ages

 

[lozzablake]

Tty this:

Sub AutofitCols()
    Dim mySheet As Worksheet
    

    For Each mySheet In ThisWorkbook.Sheets
        mySheet.Columns.AutoFit
    Next mySheet


End Sub