Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1880to1884
1880to1884
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

O365 Abfrage der aktiven User in Tabelle

Forumthread: O365 Abfrage der aktiven User in Tabelle

O365 Abfrage der aktiven User in Tabelle
06.05.2022 06:54:13
SteffenS
Hallo Zusammen,
gibt es eine Möglichkeit abzufragen, welche User sich alles in einer gemeinsam unter OneDrive-Tabelle geöffnet haben und diese bearbeiten.
Danke Euch
VG SteffenS
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: O365 Abfrage der aktiven User in Tabelle
06.05.2022 08:24:15
Raphael
Hallo Steffen,
wenn es um VBA geht nutze ich das hier 

strUserName = VBA.Environ("UserName")
strUserName = UCase(strUserName)
dafür und speichere diese Information in einem Ausgeblendeten Tabellenblatt.
Wenn Du nur Wissen möchtest wer Online ist ohne die Mappe zu öffnen, kannst Du das in Deinem Online Ordner von OneDrive sehen.
MfG
Raphael
Anzeige
AW: O365 Abfrage der aktiven User in Tabelle
06.05.2022 10:33:13
Herbert_Grom
Hallo Steffen,
teste mal in "DieseArbeitsmappe":

Option Explicit
Dim sUserName$, lRowIn&
Private Sub Workbook_Open()
lRowIn = Tab_opt.Cells(Rows.Count, "A").End(xlUp).Row + 1
Tab_opt.Cells(lRowIn, 1).Value = Environ("UserName")
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim lRow&
On Error GoTo ende
lRow = Range("1:1000").Find(What:=Environ("UserName")).Row
Rows(lRow).Delete
ende:
Application.DisplayAlerts = False
ActiveWorkbook.Close True
End Sub
Servus
Anzeige
AW: O365 Abfrage der aktiven User in Tabelle
06.05.2022 10:36:35
Herbert_Grom
Sorry, aber ich habe das im neuen Tabellenblatt "options" gemacht. Dieses musst du im VBA-Editor von "Tabelle2" in "Tab_opt" umbenennen und dann ausblenden.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige