Excel обнаружил нечитаемый контент - проверка данных

У меня есть несколько полей со списком, которые я заполняю при открытии рабочей книги - источник данных поступает из базы данных.

Я заполняю свои поля со списком, используя проверку данных следующим кодом: -

  With Selection.Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:=list
    .IgnoreBlank = False
    .InCellDropdown = True
    .ShowInput = True
    .ShowError = True
  End With

где список - это строка, разделенная запятыми, которую я создал из набора записей базы данных.

Это все отлично работает. Проблема возникает, когда я снова открываю книгу позже. Я получаю ошибку

«Excel обнаружил нечитаемый контент. Хотите восстановить содержимое этого файла»

Вы говорите «да», а затем Excel дает вам

«Excel удалось восстановить файл, удалив функции»

И проверка данных из некоторых полей со списком исчезла

Я подозреваю, что из какого-то интернет-поиска слишком длинная строка, которую я использую для проверки данных?

Я не могу добавить значения набора записей на скрытый лист и установить источник проверки данных на диапазон на скрытом листе, так как поля со списком являются динамическими и изменяются в зависимости от выбора пользователя. Мне просто нужно иметь возможность установить проверку данных для моей строки, которую я создал в различные моменты взаимодействия с пользователем.

Если это слишком длинная строка, можно ли добавить ее к проверке данных или есть другой прием, который я могу использовать, чтобы обойти эту проблему?

Ответы на вопрос(5)

Ваш ответ на вопрос