Autowidth for columns in subForm

[rockstar283]

I have developed an Access app, which has different navigational tabs which open up different forms. e.g. Tab A has Form A inside it and Form A has SubForm A1 inside it. For some reason, the following code is not working on any of the fields
Me.YourFieldName.ColumnWidth = -2



Can anyone please suggest me some workaround so that all the fields in the subforms will have auto width adjustable to fit in the text.
Thank you!!

[June7]

Is this a Navigation Form? I don't like and don't use Navigation Form. However, if that code is in the subform module and subform is Datasheet view, seems it should still work even if the subform is on a Navigation Form. But since I won't use NF I am not so familiar with their nuances.

[ranman256]

Columns cant have negative value.
You could try fld.columnwidth = 20 and do it for each field upon tab_click.

[June7]

Ranman, using a negative value should cause the control to resize to least width that will still allow full display of data. Review http://msdn.microsoft.com/en-us/libr...ffice.11).aspx

[rockstar283]

Yes..This subform A1 is inside a Form A in Tab A and setting the column width to -2 does set it to minimum width possible. Not sure why this is not working.

[rockstar283]

I want to use the new code in OnClick event of the Navigation tab..so that everytime, the user clicks on the tab name, all the columns in the corresponding subforms will have proper width

[June7]

Asking again - is this a Navigation Form?

Or is this a normal form with a Tab control? I just tested click event of page of Tab control and it does nothing. No idea why Tab control even has events, none seem to work.

Is the code behind the subform or main form?

[rockstar283]

Asking again - is this a Navigation Form?

Or is this a normal form with a Tab control? I just tested click event of page of Tab control and it does nothing. No idea why Tab control even has events, none seem to work.

Is the code behind the subform or main form?

Sorry.. its a Navigation form

to clarify more:


Got one Navigation Form NavFormA


NavFormA has different NavigationButtons. Button1 has FormB as its 'Navigation target name' i.e. it loads FormB when Button1 is clicked upon.


FormB has a subform subfrmC in it and subfrmC has datasheet in it.


I want to the columns of subfrmC to automatically adjust their widths whenever button1 is clicked.


NavFormA -> Button1 -> FormB -> subfrmC

[June7]

Then see post 2.

And review https://www.accessforums.net/forms/t...orm-32053.html

[rockstar283]

Then see post 2.

And review https://www.accessforums.net/forms/t...orm-32053.html

So for me..it becomes:

Forms!NavFormA.Form!FormB.Form!subfrmC.Forms.txtCl ient.ColumnWidth = -2???

Its not working

I also tried:
Forms!NavFormA.Form!Form_FormB.Form!subfrmC.Forms.txtClient.ColumnWidth = -2
where Form_FormB is the name of the class object for FormB

[June7]

So the code is behind the main form?

If you want to provide db for analysis, follow instructions at bottom of my post.

Perhaps code in the subform Load event.

[rockstar283]

Here is my current code behind the subfrm

Private Sub Form_Current()


Dim ctrl As Control
For Each ctrl In Me.Controls
If ctrl.ControlType = acTextBox Then ctrl.ColumnWidth = -2
Next


End Sub


Private Sub Form_Load()


Me.txtClient.ColumnWidth = -2
Me.txtSDP.ColumnWidth = -2
Me.txtCategory.ColumnWidth = -2
Me.txtEmployee.ColumnWidth = -2
Me.txtTitle.ColumnWidth = -2
Me.txtManager.ColumnWidth = -2
Me.txtRollup.ColumnWidth = -2
Me.txtAllocation.ColumnWidth = -2
Me.txtOffice.ColumnWidth = -2


End Sub

[June7]

Current event should do the trick as well as Load, I would think, at least it does with a normal form.

However, as noted, I am not that familiar with Navigation Form and would have to work with to analyse issue. I don't have any db using Navigation Form and do not want to build.

[rockstar283]

Current event should do the trick as well as Load, I would think, at least it does with a normal form.

However, as noted, I am not that familiar with Navigation Form and would have to work with to analyse issue. I don't have any db using Navigation Form and do not want to build.

Thanks for all the help man..I really appreciate it..I will keep digging more..anyone else has any thoughts on this issue?