Check to see how many tabs open?

[Montez659]

Is there any way to check to see how many tabls are open on the main interface, and if there is more than one, make a particular form then not be pop up, and switch back if that particular form is the only one open?

 

[Montez659]

NM. MS help said the PopUp proerty can only be set in design view. Unless anyone knows of a workaround.

 

[Kreszch68]

I’m not really sure if you want the tables, tabs or forms to be checked, so that part I’ll leave up to you.<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
Regarding the property change of the form, yes there is a workaround.<o></o>

Public Sub callSetFrmProperty()
'Routine that calls the set property routine
Dim sFrmName As String
Dim blnPopUp As Boolean
sFrmName = "frmPopOrNot"
'do your table check, returns blnPopUp true or false
'call routine to set property
setFrmProperty blnPopUp, sFrmName
End Sub
Public Sub setFrmProperty(ByVal blnPopUp As Boolean, _
                          ByVal sFrmName As String)
Dim oFrm As Access.Form
'open form in design mode
DoCmd.OpenForm sFrmName, acDesign
        Set oFrm = Forms(sFrmName)
        'set properties
                With oFrm
                        .PopUp = blnPopUp
                End With
        'open form in normal mode
        Set oFrm = Nothing 
        DoCmd.OpenForm sFrmName, acNormal
 
End Sub

 

[Montez659]

Lol! No wonder you couldn't tell what I was looking for. I just went back and reread my post. I think I used tab, form and table all interchangeably! Thats Friday for ya!

Anyways, was just needing to check to see if there were forms open. I appreciate the code and I will give it a shot. Might be sometime next week before I get to mess around with it. I will let you know if it works out.