Tim.

We don't know english very well but probably I can help you.

Why do not code a simply function to check if the table you pass by
parameter is open ? (Iam using it).
If the table is not open you execute the FileOpenDialog.

Example

Sub main()

        If Not isTableOpen("Table1") Then        'Table1 is the alias of the
table you want to check.
            FileOpenDialog .....
        End If

        If Not isTableOpen("Table2") Then
            FileOpenDialog .....
        End If

        .... here you are  sure that the tables you need are open

End Sub

Function isTableOpen(byval as_table as String) as Logical
    ... using onerror you will know is the table is open
    ... if is open
            isTableOpen = True
        Else
            isTableOpen = False
        End If
End Function

I hope this can help you. Let me know please.
Alejandro.
Mapping Global Solutions.
Argentina

Reply via email to