Добрый день.
Есть такая проблема - один файл Excel лежит в сетевом каталоге, но используется несколькими людьми для редактирования по мере надобности. Есть один человек, который правки в документ не вносит, а только смотрит, но вечно файл открывает и забывает закрыть, остальные соответственно не могут с фалом на редактирование работать.
Возникла идея - нужно, чтобы файл автоматически закрывался через скажем 5 минут без сохранения правок (если они были), если этот конкретный пользователь открыл файл.
Я нашёл некий макрос, который файл закрывает файл после 5 минут, но как туда добавить условие на проверку пользователя, открывшего файл и как его назначить на условие типа "Открыть файл"?
Спасибо заранее за помощь.
Есть такая проблема - один файл Excel лежит в сетевом каталоге, но используется несколькими людьми для редактирования по мере надобности. Есть один человек, который правки в документ не вносит, а только смотрит, но вечно файл открывает и забывает закрыть, остальные соответственно не могут с фалом на редактирование работать.
Возникла идея - нужно, чтобы файл автоматически закрывался через скажем 5 минут без сохранения правок (если они были), если этот конкретный пользователь открыл файл.
Я нашёл некий макрос, который файл закрывает файл после 5 минут, но как туда добавить условие на проверку пользователя, открывшего файл и как его назначить на условие типа "Открыть файл"?
Код |
---|
Sub ЗакрытьФайл() Application.OnTime Now + TimeValue("00:05:00"), "Закрыть" End Sub Sub Закрыть() ThisWorkbook.Close SaveChanges:=False End Sub |