Как определить, открыта ли электронная таблица Excel 2007 и открыта ли она в ВОЗ с использованием VBScript
Как мне узнать, открыта ли электронная таблица Excel 2007 и открыта ли она в ВОЗ с использованием VBScript?
Я пытаюсь выяснить, открыта ли книга Excel в данный момент другим пользователем, и возвращаю, кто этот пользователь в моем сценарии.
Я уже выяснил, кому определить, открыта ли рабочая книга в данный момент. Это обходной путь, но я в основном открываю книгу и проверяю, доступна ли она только для чтения. Это работает отлично; Я проверил это.
Я знаю, что это возможно, потому что Excel дает вам пользователя, у которого открыт файл, если вы откроете его через браузер.
Вот мой код (isWorkbookOpen.vbs):
Set objExcelTestWorkbook = CreateObject("Excel.Application")
objExcelTestWorkbook.DisplayAlerts = False 'doesn't display overwrite alert
testWorkbookFile = "I:\test_workbook.xlsx"
Set objBook = objExcelTestWorkbook.Workbooks.open(testWorkbookFile)
If objBook.ReadOnly Then
Wscript.echo "The file is read only"
Call EndScript
Else
Wscript.echo "The file is available"
Call EndScript
End If
Function EndScript
objExcelTestWorkbook.Workbooks.close
objExcelTestWorkbook.Quit
WScript.Echo "Closed " & testWorkbookFile
WScript.Quit
End Function
Также я запускаю это из командной строки:
cscript isWorkbookOpen.vbs