The SOSCQ Page (Excel) - VBA-Spezialthema "Freigegebene Arbeitsmappen"

VBA-Spezialthema "Freigegebene Arbeitsmappen"

Allgemeines über das Thema "Freigegebene Arbeitsmappen"

Übersicht der wichtigsten Methoden und Eigenschaften

Application-Objekt: Eigenschaften

Workbook-Objekt: Eigenschaften

Workbook-Objekt: Methoden

Zur Hauptseite

Diese Seite ist in Bearbeitung!

Allgemeines über das Thema "Freigegebene Arbeitsmappen"

Die Programmierung von VBA-Code zum Öffnen und Speichern von Arbeitsmappen ist nicht sonderlich schwierig. Wenn allerdings die Arbeitsmappe für die gemeinsame Bearbeitung freigegeben ist, ist die Sache schon nicht mehr ganz so einfach. Verschiedene Situationen und zusätzliche Anforderungen müssen gemeistert werden, wie beispielsweise das Setzen des Zugriffsmodus (Access Mode), das Ermitteln der Benutzer, welche gerade eine bestimmte Mappe gemeinsam bearbeiten (User Status), oder auch das Lösen von Änderungskonflikten beim Speichern (Conflict Resolution).

Auf dieser Seite werden die wichtigsten Objekt-Methoden und -Eigenschaften vorgestellt, die Sie im Zusammenhang mit freigegebenen Arbeitsmappen kennen sollten.

	Verwandte Themen
	Arbeitsmappen freigeben

Übersicht der wichtigsten Methoden und Eigenschaften

Application-Objekt

Application-Objekt: Eigenschaften

Eigenschaft	Beschreibung
Application.UserName	-

Workbook-Objekt

Workbook-Objekt: Eigenschaften

Eigenschaft	Beschreibung
Workbook.AutoUpdateFrequency	-
Workbook.AutoUpdateSaveChanges	-
Workbook.MultiUserEditing	Gibt zurück, ob die Arbeitsmappe für die gemeinsame Bearbeitung freigegeben ist.
Workbook.RevisionNumber	-
Workbook.ShowConflictHistory	-
Workbook.UserStatus	Gibt ein zweidimensionales Array mit Informationen über die Benutzer zurück, die die Arbeitsmappe gerade bearbeiten.
Workbook.WriteReserved	Gibt zurück, ob die Arbeitsmappe ein Schreibschutzkennwort besitzt.
Workbook.WriteReservedBy	Gibt den Namen des Benutzers zurück, der die Arbeitsmappe mit einem Schreibschutzkennwort versehen hat. Hinweis Wenn die Mappe nicht mit einem Kennwort geschützt ist, wird der Name des aktuellen Benutzers zurückgegeben.

Dim lngRow As Long
Dim varUsers As Variant
varUsers = ActiveWorkbook.UserStatus
With Workbooks.Add.Sheets(1)
  For lngRow = 1 To UBound(varUsers, 1)
    .Cells(lngRow, 1) = varUsers(lngRow, 1)
    .Cells(lngRow, 2) = varUsers(lngRow, 2)
    Select Case varUsers(lngRow, 3)
      Case 1
        .Cells(lngRow, 3).Value = "Exclusive"
      Case 2
        .Cells(lngRow, 3).Value = "Shared"
    End Select
  Next lngRow
End With

Workbook-Objekt: Methoden

Methode	Beschreibung
Workbook.ExclusiveAccess	-
Workbook.SaveAs	Der Parameter AccessMode steuert den Zugriffsmodus auf die Datei.
Workbook.AcceptAllChanges	-

Haben Sie Fragen, Anregungen oder Hinweise?
Senden Sie mir ein Mail