ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Kick someone out of a Spreadsheet (https://www.excelbanter.com/excel-discussion-misc-queries/175268-kick-someone-out-spreadsheet.html)

Jules815

Kick someone out of a Spreadsheet
 
If someone leaves a spreadsheet open on ther computer overnight, is there a
way to kick them out of it?

ExcelBanter AI

Answer: Kick someone out of a Spreadsheet
 
Yes, there is a way to kick someone out of a spreadsheet if they have left it open on their computer overnight. Here are the steps you can follow:
  1. Open the shared workbook in Excel.
  2. Click on the "Review" tab in the ribbon.
  3. Click on the "Share Workbook" button in the "Changes" group.
  4. In the "Share Workbook" dialog box, click on the "Advanced" tab.
  5. Under the "Who has this workbook open now" section, select the user you want to kick out.
  6. Click on the "Remove User" button.
  7. Click "OK" to confirm the action.

This will remove the selected user from the shared workbook and they will no longer be able to make changes to it. However, it's important to note that this will not close the workbook on their computer. They will need to manually close the workbook to ensure that they are fully removed from it.

Bob I

Kick someone out of a Spreadsheet
 
Reboot the PC.

Jules815 wrote:

If someone leaves a spreadsheet open on ther computer overnight, is there a
way to kick them out of it?



Jules815

Kick someone out of a Spreadsheet
 
Sorry should have specified "remotely"
We are virtual workers and someone opened a spreadsheet on the network drive
and left it open so nobody else can open it to make changes.

"Bob I" wrote:

Reboot the PC.

Jules815 wrote:

If someone leaves a spreadsheet open on ther computer overnight, is there a
way to kick them out of it?




Sandy Mann

Kick someone out of a Spreadsheet
 
Look at this string but take not of the warnings:

http://tinyurl.com/37rrte

--
HTH

Sandy
In Perth, the ancient capital of Scotland
and the crowning place of kings


Replace @mailinator.com with @tiscali.co.uk


"Jules815" wrote in message
...
Sorry should have specified "remotely"
We are virtual workers and someone opened a spreadsheet on the network
drive
and left it open so nobody else can open it to make changes.

"Bob I" wrote:

Reboot the PC.

Jules815 wrote:

If someone leaves a spreadsheet open on ther computer overnight, is
there a
way to kick them out of it?







Bob I

Kick someone out of a Spreadsheet
 
If you have access to the server simply "disconnect" that user from the
server.

Jules815 wrote:

Sorry should have specified "remotely"
We are virtual workers and someone opened a spreadsheet on the network drive
and left it open so nobody else can open it to make changes.

"Bob I" wrote:


Reboot the PC.

Jules815 wrote:


If someone leaves a spreadsheet open on ther computer overnight, is there a
way to kick them out of it?





Tom Hutchins

Kick someone out of a Spreadsheet
 
We do this all the time with Access databases
(http://support.microsoft.com/?id=128814). I have adapted the same concept
for Excel.

In the ThisWorkbook module of the workbook, paste the following code:

Private Sub Workbook_Open()
'Set StartTime when the workbook is opened.
StartTime = Timer
'Schedule a call to CheckTime in the future to check elapsed idle time.
Application.OnTime (Now + TimeValue(TimeCheckDelay)), "CheckTime"
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Something changed in the workbook, so reset StartTime.
StartTime = Timer
End Sub

In A VBA code module in the same workbook, paste this code:

Global StartTime As Single

Global Const TimeLimitInMinutes = 58 'idle time threshold
Global Const TimeCheckDelay = "00:10:00"

Sub CheckTime()
Dim NewTime As Single
'Get the time (seconds past midnight) now.
NewTime = Timer
'If StartTime was yesterday, add 86400 seconds to NewTime.
If NewTime < StartTime Then
NewTime = NewTime + 86400
End If
'If TimeLimitInMinutes has expired since StartTime was last
'updated, close the workbook without saving changes.
If (NewTime - StartTime) (TimeLimitInMinutes * 60) Then
ThisWorkbook.Saved = True
ThisWorkbook.Close SaveChanges:=False
Else
'Otherwise, schedule a call to CheckTime in the future to check
'again later.
Application.OnTime (Now + TimeValue(TimeCheckDelay)), "CheckTime"
End If
End Sub

The code above is set to close the workbook without saving changes if it is
idle for more than 58 minutes. It will check every 10 minutes.

I haven't tested this extensively yet (overnight), but the short tests I
have run worked perfectly.

Hope this helps,

Hutch

"Jules815" wrote:

Sorry should have specified "remotely"
We are virtual workers and someone opened a spreadsheet on the network drive
and left it open so nobody else can open it to make changes.

"Bob I" wrote:

Reboot the PC.

Jules815 wrote:

If someone leaves a spreadsheet open on ther computer overnight, is there a
way to kick them out of it?





All times are GMT +1. The time now is 04:23 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com