Dokumente sollen nicht mehr abänderbar u. kopierbar sein

    Dann mach noch eine Abfrage rein:


    If (Mode = 1 ) Then
    If Not (source.isnewdoc) then
    currentStatus = source.Document.erledigt(0)
    If ( currentStatus = "Ja" ) Then
    Messagebox ( "Dieses Dokument darf nicht mehr verändert werden" )
    continue = False
    End If
    End If
    End If


    Ein neues Doc wird ja wohl nicht schon erledigt sein ;)