Is your subform in Datasheet view? If so, then you can set the width of a column like this:
Me.NameOfYourControl.ColumnWidth = 100
Obviously, you'd change "100" to whatever width you want. The value of the ColumnWidth is in Twips, so to set it to 1" you'd use a value of 1440 (1440 Twips = approximately 1 Inch). If you want to set it to "autofit" the text, set
the value to -2.
-- Scott McDaniel, Microsoft Access MVP