Подскажите, пожалуйста, каким образом заставить Excel отображать исправления, внесенные в режиме рецензирования, при открытии на другом компьютере?
Подскажите, пожалуйста, каким образом заставить Excel отображать исправления, внесенные в режиме рецензирования, при открытии на другом компьютере?sylvio
в файл,в котором нужно отслеживать изменения,в модуль ЭтаКнига вставьте этот скрипт прежде,чем вставить скрипт,в файле нужно отключить общий доступ,чтобы увидеть в vbe модуль ЭтаКнига чтобы скрипт сработал,пользователь должен разрешить запуск макросов [vba]
Код
Private Sub Workbook_Open() Application.DisplayAlerts = False ThisWorkbook.SaveAs Filename:=ThisWorkbook.FullName, _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, AccessMode:=xlShared Application.DisplayAlerts = True With ThisWorkbook .HighlightChangesOptions When:=xlSinceMyLastSave .ListChangesOnNewSheet = False .HighlightChangesOnScreen = True End With End Sub
[/vba]
в файл,в котором нужно отслеживать изменения,в модуль ЭтаКнига вставьте этот скрипт прежде,чем вставить скрипт,в файле нужно отключить общий доступ,чтобы увидеть в vbe модуль ЭтаКнига чтобы скрипт сработал,пользователь должен разрешить запуск макросов [vba]
Код
Private Sub Workbook_Open() Application.DisplayAlerts = False ThisWorkbook.SaveAs Filename:=ThisWorkbook.FullName, _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, AccessMode:=xlShared Application.DisplayAlerts = True With ThisWorkbook .HighlightChangesOptions When:=xlSinceMyLastSave .ListChangesOnNewSheet = False .HighlightChangesOnScreen = True End With End Sub