Script to prevent PC from sleeping

[jordanburch]

Hi I'm looking for a script that will prevent my laptop from sleeping and keep teams active. I also need instructions on how to install. Can anyone help me please?

 

[Drrellik]

Hi I'm looking for a script that will prevent my laptop from sleeping and keep teams active. I also need instructions on how to install. Can anyone help me please?

I think you can simply go to settings on your PC (Not Excel) and set your PC to Never instead of a time

 

[Candyman8019]

I typically use something like this to keep the presence indicator active and the computer awake. Paste this into a module.

Private NextTime As Date

Sub KeepAlive()
ActiveSheet.Range("A1").Select

Application.Wait DateAdd("s", 1, Now)
NextTime = DateAdd("s", 30, Now)

SendKeys ("{enter}")

Application.OnTime NextTime, "KeepAlive"

End Sub
Sub StopKeepAlive()
On Error Resume Next

Application.OnTime NextTime, "KeepAlive", , False
End Sub

Run 'KeepAlive' to start it. Important: after running the script, select a cell in your worksheet. Any cell will be fine.
To stop it, run 'StopKeepAlive'.

 

[JEC]

Use a powerpoint slide show which is never ending.

 

[jordanburch]

I typically use something like this to keep the presence indicator active and the computer awake. Paste this into a module.

Private NextTime As Date

Sub KeepAlive()
ActiveSheet.Range("A1").Select

Application.Wait DateAdd("s", 1, Now)
NextTime = DateAdd("s", 30, Now)

SendKeys ("{enter}")

Application.OnTime NextTime, "KeepAlive"

End Sub
Sub StopKeepAlive()
On Error Resume Next

Application.OnTime NextTime, "KeepAlive", , False
End Sub

Run 'KeepAlive' to start it. Important: after running the script, select a cell in your worksheet. Any cell will be fine.
To stop it, run 'StopKeepAlive'.

awesome thanks

 

[jordanburch]

Use a powerpoint slide show which is never ending.

does it keep you active even if you log out but keep laptop on?