I do not know of anyway to set the columns widths at the datasheet level.
However, if you name your textboxes systematically (for example, "txt...")
you can loop through the controls collection and set their column width
according.
Dim ctl as Control
Dim ctl As Control
For Each ctl In Me.subfrm.Controls
If Left(ctl.Name, 3) = "txt" Then
ctl.ColumnWidth = -2
End If
Next ctl
--
David Lloyd
MCSD .NET
http://LemingtonConsulting.com
This response is supplied "as is" without any representations or warranties.
<dh*****@daubert.com> wrote in message
news:11*********************@g47g2000cwa.googlegro ups.com...
Can I have a datasheet form automatically "fit" the column widths when
the form opens?