Excel содержит очень полезный инструмент, который позволяет отслеживать исправления, вносимые в рабочую книгу
Есть файл приложенный к документу 1с. Вопрос как включить этот инструмент программно?
---
Вы не написали, как открываете саму книгу.
Но если есть её объект(в примере взята активная книга ActiveWorkbook), тогда так:

```1c
    ActiveWorkbook.KeepChangeHistory = True
    ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, AccessMode:=xlShared
    ActiveWorkbook.HighlightChangesOptions When:=xlAllChanges
    ActiveWorkbook.ListChangesOnNewSheet = False
    ActiveWorkbook.HighlightChangesOnScreen = True
```
---
Попробуйте так:
```1c
    Excel = Новый COMОбъект("Excel.Application");

    Excel.DisplayAlerts = Ложь;

    Workbook = Excel.Workbooks.Open(Путь);

    Workbook.RemovePersonalInformation = Ложь;
    Workbook.KeepChangeHistory = Истина;

    FileName = Путь;
    FileFormat = 51; //xlOpenXMLWorkbook
    Password = Неопределено;
    WriteResPassword = Неопределено;
    ReadOnlyRecommended = Неопределено;
    CreateBackup = Ложь;
    AccessMode = 2; //xlShared
    ConflictResolution = 2; //xlLocalSessionChanges
    AddToMru = Неопределено;
    TextCodepage = Неопределено;
    TextVisualLayout = Неопределено;
    Local = Неопределено;

    Workbook.SaveAs(
    FileName,
    FileFormat,
    Password,
    WriteResPassword,
    ReadOnlyRecommended,
    CreateBackup,
    AccessMode,
    ConflictResolution,
    AddToMru,
    TextCodepage,
    TextVisualLayout,
    Local);

    Excel.Quit();
```
---
Вы не написали, как открываете саму книгу.
Но если есть её объект(в примере взята активная книга ActiveWorkbook), тогда так:

```1c
    ActiveWorkbook.KeepChangeHistory = True
    ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, AccessMode:=xlShared
    ActiveWorkbook.HighlightChangesOptions When:=xlAllChanges
    ActiveWorkbook.ListChangesOnNewSheet = False
    ActiveWorkbook.HighlightChangesOnScreen = True
```
---
В идеале ее вообще не нужно открывать. Можно это как-то засунуть в параметр при записи
---
в параметр при записи Про какую запись идёт речь? В любом случае, чтобы сделать то, что вы хотите, нужно пересохранить книгу с параметром AccessMode:=xlShared.
---
Excel = Новый COMОбъект("Excel.Application");
ExcelFile = Excel.WorkBooks.Open(Путь);

Excel.ActiveWorkbook.SaveAs(FullName) Как задать параметр?

Excel.ActiveWorkbook.SaveAs(FullName, "AccessMode:=xlShared") так ошибку выдает
---
Попробуйте так:
```1c
    Excel = Новый COMОбъект("Excel.Application");

    Excel.DisplayAlerts = Ложь;

    Workbook = Excel.Workbooks.Open(Путь);

    Workbook.RemovePersonalInformation = Ложь;
    Workbook.KeepChangeHistory = Истина;

    FileName = Путь;
    FileFormat = 51; //xlOpenXMLWorkbook
    Password = Неопределено;
    WriteResPassword = Неопределено;
    ReadOnlyRecommended = Неопределено;
    CreateBackup = Ложь;
    AccessMode = 2; //xlShared
    ConflictResolution = 2; //xlLocalSessionChanges
    AddToMru = Неопределено;
    TextCodepage = Неопределено;
    TextVisualLayout = Неопределено;
    Local = Неопределено;

    Workbook.SaveAs(
    FileName,
    FileFormat,
    Password,
    WriteResPassword,
    ReadOnlyRecommended,
    CreateBackup,
    AccessMode,
    ConflictResolution,
    AddToMru,
    TextCodepage,
    TextVisualLayout,
    Local);

    Excel.Quit();
```
---
RemovePersonalInformation
Почти получилось. А как изменить Отслеживать исправления, внесенные: по времени с "Со времени последнего сохранения" на "Все"
---
эти настройки похоже не хранятся в файле. Огромное спасибо. Вопрос закрыт
---
так и не получилось установить "по времени" в значение "Все"?
---
Собственно, больше и не искал. Я как понял этой информации нет в файле