� Gegeben Sei ein Netzwerk, das Betriebssystem Windows NT�
���� und der gestartete Nachrichtendienst.
���� Wollen Sie nun wissen, wer auf bestimmte Dateien zugreift,
���� k�nnen Sie den Befehl net send benutzen:

���� F�gen Sie in die entsprechende Excel-Datei ein Modul ein.
���� Erzeugen Sie folgendes Makro:

   Sub Auto_open()
      On Error Goto Err
      Pfad = ThisWorkbook.Path
      If Right(Pfad, 1) <> "\" Then Pfad = Pfad & "\"
      Dateiname = Pfad & ThisWorkbook.Name
      Benutzer = Application.UserName
      Shell "net send \\PC-M�ller " & Dateiname & _
        " wurde ge�ffnet von " & Benutzer, vbHide
      Err:
   End Sub

���� Anstelle PC-M�ller setzen Sie den Namen Ihres Computers ein.

���� Bei jedem �ffnen der Datei werden Sie nun durch eine PopUp-Meldung
���� dar�ber informiert, wer die Datei �ffnet.