entirecolumn.autofit

patrickmuldoon99

Active Member
Joined
Jun 27, 2006
Messages
345
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?
 

Excel Facts

Which Excel functions can ignore hidden rows?
The SUBTOTAL and AGGREGATE functions ignore hidden rows. AGGREGATE can also exclude error cells and more.

patrickmuldoon99

Active Member
Joined
Jun 27, 2006
Messages
345
It uses a for each structure, using an object s

Code:
for each s in sheets
entirecolumn.autofit
next s

and it takes ages :cry:
 

lozzablake

Well-known Member
Joined
Dec 15, 2005
Messages
818
Tty this:

Code:
Sub AutofitCols()
    Dim mySheet As Worksheet
    

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


End Sub
 

Forum statistics

Threads
1,136,651
Messages
5,677,004
Members
419,667
Latest member
MegEri

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top