Как да проверите дали книгата е отворен, се отличи за всички

Аз имам малко по-различен проблем, моят файл може да се отвори или да чете или пълен достъп, с поставена макрос, който затваря файла автоматично след определено време, да кажем след 5 минути, ако не се вземат мерки. Въпросът е как трябва да бъдат написани в кода, за да видите, ако файлът е открита само за четене случи просто затваряне на файла, без да го запаметявате, и ако те пишат, че за пръв път записва файла. и след това го затваря.

Моля да ме извините, не даде повече подробности. Кодът трябва да се определи "Начинът, по който (I), като отвори книгата," и да изберете опцията за затваряне.

Алекс, че има смисъл да първо най-малкото нещо да се търси сред свойствата и методите на книгата :) Обикновено много неща може да се намери

Дим Сф Както стринга

Дим Световната банка, както работна книга

Задайте WB = Работни книги. Open (ThisWorkbook. Path "" SF, False, True)

MsgBox "Достъп само за четене -". WB. ReadOnly

"Затваря книгата с опазването, ако се отвори за редактиране и без да записвате - ако Само за четене

WB. Не затваряй WB. ReadOnly

Споделете мнението си

Как да проверите дали книгата е отворен, се отличи за всички

Как да проверите дали книгата е отворен, се отличи за всички

Просто прочетете тази статия:

Благодаря ви за вашето съобщение

Вашето съобщение е получено и изпращат на администратора.