The problem described in http://support.microsoft.com/kb/214394 seems to
prevent AutoFit from working as expected.

Is there a progammatic solution?

I tried

With wst.Columns.EntireColumn
.Font.Name = "Courier New"
.AutoFit
End With

Still required manual adjustment.

One approach, too ugly to use, might be to search for the largest cell in
each column and adjust the column size.
Is there a better way?

--
http://www.standards.com/; See Howard Kaikow's web site.