PDA

View Full Version : Solved: Send a frame control to a procedure as a parameter



jdmils
06-03-2006, 01:54 AM
I have code which will enable one of 10 frames on a form depending on a control parameter which is predetermined. Here is my code which enables a fram control and all controls within it:


Private Sub ActivateFrameAndControls(ByRef aFrame As Object)
aFrame.Enabled = True
' Cycle thru all controls in the respective frame.
For Each InnerCtrl In aFrame.Controls
' Enable each one.
InnerCtrl.Enabled = True
Next InnerCtrl
End Sub
My problem is that my calling code will pass th frame to the procedure, but the line "aFrame.Enabled = True" fails with the error "Runtime error 438. Object does not support this property or method".

Here's my calling code:


If bShowApp Then ActivateFrameAndControls (Me.fraApp)

lenze
06-03-2006, 04:56 AM
Cross Post

http://www.mrexcel.com/board2/viewtopic.php?t=215212

lenze

jdmils
06-03-2006, 05:09 AM
Found the problem....it was in my calling code. It should have been:

If bShowApp Then Call ActivateFrameAndControls (Me.fraApp)

:banghead: