Global variabel også efter en fil er blevet lukket.

Hej E.

Jeg har følgende kode:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

On Error Resume Next
    If tilladluk = 1 Then
        ThisWorkbook.Saved = True
        Cancel = False
    Else
        Cancel = True
    End If

End Sub

Public Sub Afslut()

tilladluk = 1
Workbooks.Close

End Sub

Public Sub spoergsmaal()
Dim iSvar As Integer
    iSvar = MsgBox("vil du lukke Excel", vbYesNo)
        If iSvar = vbYes Then
            'Logon.Show
            Call Afslut
        Else
        tilladluk = 0
       
       
        End If
       
End Sub

Det virker perfekt.
Problemet er bare at hvis man kopiere filen så man har to stk ens filer, og der efter lukker den ene, kan den ikke lukke den anden da tilladluk variablen er = 0 (i den anden fil)

Hvordan kan jeg oprette en variable soom kan bruger på tvære af filer.

Eller en anden måde at komme omkring problemet.

Håber meget i kan hjælpe, da jeg skal være færdie i dag.