ActiveX

To resize columns and rows to fit text

At run time,

1. If your control contains more than one sheet, specify the sheet with which you want to work by setting the Sheet property.
2. If you want to resize a column to fit the widest text,
   1. Set the MaxTextColWidth property to a variable.
      Specify the column in the lCol parameter of this property. To specify the row header, enter 0 as the column.
   2. Set the ColWidth property to the variable defined in Step 1.
      To resize the width of all columns to the maximum width of the specified column, set the lCol parameter to –1. To resize the width of the row header to the maximum width of the specified column, set the lCol parameter to 0.
3. If you want to resize a row to fit the tallest text,
   1. Set the MaxTextRowHeight property to a variable.
      Specify the row in the lRow parameter of this property. To specify the column header, enter 0 as the row.
   2. Set the RowHeight property to the variable defined in Step 1.
      To resize the height of all rows to the maximum height of the specified row, set the lRow parameter to –1. To resize the height of the column header to the maximum height of the specified row, set the lRow parameter to 0.