K
Karen S
I am attempting to make a text box size dynamically at
run time on a data access page. I found the
article "Customizing Page Controls at Run Time in Access
2002"
http://office.microsoft.com/assistance/2002/articles/acCus
tomizeControlsOnAPage_aw.htm
Unfortunately, the code they give is not working for me.
The demo code:
<!--
Dim dscconst
Dim sec
Dim el
Set c = MSODSC.Constants
Set sec = dscei.DataPage.FirstSection
While (not(sec is nothing))
If (sec.type = c.sectTypeHeader) Then
Set el =
sec.HTMLContainer.children("Description")
sec.HTMLContainer.style.height =
el.offsetTop + el.offsetHeight + 5
End If
Set sec = sec.NextSibling
Wend
-->
</SCRIPT>
I've changed "Description" to the name of my text
box "GroupOftxtDescription" and get "Error: object
required: 'el' " I thought it was because of the
grouping thing, but it doesn't seem to work for other
text boxes either (same error). Any thoughts would be
appreciated.
Thanks!
Karen
run time on a data access page. I found the
article "Customizing Page Controls at Run Time in Access
2002"
http://office.microsoft.com/assistance/2002/articles/acCus
tomizeControlsOnAPage_aw.htm
Unfortunately, the code they give is not working for me.
The demo code:
<!--
Dim dscconst
Dim sec
Dim el
Set c = MSODSC.Constants
Set sec = dscei.DataPage.FirstSection
While (not(sec is nothing))
If (sec.type = c.sectTypeHeader) Then
Set el =
sec.HTMLContainer.children("Description")
sec.HTMLContainer.style.height =
el.offsetTop + el.offsetHeight + 5
End If
Set sec = sec.NextSibling
Wend
-->
</SCRIPT>
I've changed "Description" to the name of my text
box "GroupOftxtDescription" and get "Error: object
required: 'el' " I thought it was because of the
grouping thing, but it doesn't seem to work for other
text boxes either (same error). Any thoughts would be
appreciated.
Thanks!
Karen