Unload forms

denne her: http://eksperten.dk/spm/526080 ?

nope... desværre

http://eksperten.dk/spm/293063

genialt :) der var den :)
smider du ikk lige et svar kabbak?

Et svar ;-))

nej nej nej, et accepteret svar :D

tak for point

nej nej, jeg takke :) Du aner ikke hvor megen hjælp de par linier er :D

Her en effektiv måde så der ikke bliver noget hængende i memmory.
Det kan jo være der er andre der kan bruge den.

Dim Form As Form
Dim Count As Integer
On Error Resume Next

Count = 0
For Each Form In Forms
    If Form.Visible Then
        Count = Count + 1
    End If
Next Form

If Count > 1 Then
    Cancel = True
    Me.Hide
Else
    For Each Form In Forms
        Unload Form
    Next Form
End If