Вводная часть:
Ситуация следующая, ввиду со складывающейся ситуацией по COVID на предприятии, всех перевели на удалённый режим работы. С доступом до рабочей почты через удалённый стол.
Всё бы не плохо, но технические возможности не позволяют всем сидеть одновременно в связи с чем ограничили доступ до удалённого рабочего стола по количеству пользователей и как следствие при отсутствии активности через 2-5 минут тебя(а бывает часто и меня) выкидывает с удалённого рабочего стола. При этом если не будет подключения ещё 5 минут закрывает все активные программы на удалённом столе.
Учитывая тот факт, что работа совмещается ещё и с телефонными разговорами совещаниями по аудио связи и пр. постоянное отключение значительно снижает эффективность работы.
Работа в основном проводится в Excel в связи с чем возникла идея которую не знаю как воплотить, нужно:
Техническая часть:
Если в активном окне Excel не происходит никакое движение в течение 2-5 минут происходило какое-нибудь движение которое воспринималось бы как активное.
К примеру после двух минут появлялись бы часы с отсчётом времени, или как раньше было в Excel булавка стучала по монитору или просто сдвигалась активная ячейка на одну клетку вправо.
Пытался делать сам.
Код |
---|
Sub kursor1() Do WScript.Sleep 3000 Selection.Offset(0, 1).SelectLoop End Sub |
Но что то не работает выдаёт ошибку «error 424 object required»
Вывод:
Нужен макрос которые при отсутствии активности более 5 минут создавал какую-нибудь активность сам. При этом не жрал бы много трафика и был максимально прост + что бы как то очень просто можно было поменять время без активности (например с 5 минут на 2 или на 10)