Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein 1-basiertes, zweidimensionales Array zurück, das Informationen zu jedem Benutzer bereitstellt, der die Arbeitsmappe als freigegebene Liste geöffnet hat. Schreibgeschützter Variant-Wert.
Ausdruck. UserStatus
expression Eine Variable, die ein Workbook-Objekt darstellt.
Das erste Element der zweiten Dimension ist der Benutzername; das zweite Element gibt Datum und Uhrzeit des Öffnens der Arbeitsmappe durch den Benutzer an; das dritte Element ist eine Zahl, die den Modus angibt (1 steht für Exklusivmodus, 2 für Freigabemodus).
Die UserStatus-Eigenschaft gibt keine Informationen über Benutzer zurück, die die angegebene Arbeitsmappe schreibgeschützt geöffnet haben.
Im folgenden Beispiel wird eine neue Arbeitsmappe erstellt, und Informationen über alle Benutzer, die die aktive Arbeitsmappe im Freigabemodus geöffnet haben, werden hinzugefügt.
users = ActiveWorkbook.UserStatus
With Workbooks.Add.Sheets(1)
For row = 1 To UBound(users, 1)
.Cells(row, 1) = users(row, 1)
.Cells(row, 2) = users(row, 2)
Select Case users(row, 3)
Case 1
.Cells(row, 3).Value = "Exclusive"
Case 2
.Cells(row, 3).Value = "Shared"
End Select
Next
End With
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.