VBA: Gegenteil von Like
15.04.2013 08:45:11
Like
kann mir jemand sagen, wie ich das Gegenteil des folgenden Codes, also so etwas wie "NOT Like" formuliere ?
Ich möchte, dass die Mappe normal geöffnet wird, wenn der Pfad ODER der Username wie angegeben sind - in allen anderen Fällen, soll die Mappe nicht geöffnet werden.
Private Sub Workbook_Open()
If ThisWorkbook.Path Like "*oma-entws-022*" Or Environ("Username") = "XXX" Then
Call UnauthorizedAccess_Msg
ThisWorkbook.Close False
End If
End Sub
VG und vielen Dank im Voraus für jeden Tipp,Markus