Страницы: 1
RSS
Запретить открытие файла, если он уже открыт
 
Здравствуйте,
Можно ли запретить открытие Excel файла, находящегося в расшаренной сетевой папке, если он уже открыт на одном их компьютеров?
 
что за надобность если он открыт то у других он откроется в режиме чтения и ни че сделать нельзя будет тока как сохранить себе копию, если в режиме общего доступа и нужно запретить другим его редактировать тогда вопрос зачем давали доступ
Лень двигатель прогресса, доказано!!!
 
Если файл уже открыт, то у меня он не открывается в режиме чтения.

Пользуюсь одним файлом с другим человеком. Я часто его корректирую и сохраняю. Второй пользователь часто не закрывает файл и сохраняет его поверх сохраненного мною. Таким образом, все мои изменения удаляются.  
 
Цитата
DanKZ пишет: Если файл уже открыт, то у меня он не открывается в режиме чтения.
Значит файл находится в общем доступе и тут народное правило кто раньше встал того и тапки не работает, тут кто последний нажал сохранить при этом изменив Ваши ячейки тот и "молодец". Меняйте подход к работе с общим файлом либо договаривайтесь кто за какие ячеки отвечает либо, делайте так.
Лень двигатель прогресса, доказано!!!
 
Видел такой способ проверки открытости файла... осталось вспомнить, где.
может быть, третий вариант отсюда подойдет?
F1 творит чудеса
 
можно попробовать приспособить такой скрипт
Код
Private Sub Workbook_Open()
    Dim arr()
    arr = ThisWorkbook.UserStatus
    If UBound(arr) > 1 Then
        MsgBox "файл занят"
        ThisWorkbook.Close
    End If
End Sub 
этот скрипт нужно вставить в модуль ЭтаКнига общего файла.
останется настроить так,чтобы макросы были разрешены конкретно для этого файла,чтобы не было предупреждающего сообщения о том ,что в файле макросы
Изменено: Karataev - 04.12.2014 23:07:37
Страницы: 1
Наверх