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
strUserName = VBA.Environ("UserName")
strUserName = UCase(strUserName)
dafür und speichere diese Information in einem Ausgeblendeten Tabellenblatt.
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
ServusDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen