Преобразование формулы проверки данных1 в относительную / абсолютную

#excel #vba

#excel #vba

Вопрос:

Я пытаюсь преобразовать проверку.формула 1 в абсолютную / относительную со строкой:

 Cells(Target.row, 6).Validation.Formula1 = Application.ConvertFormula(Cells(Target.row, 6).Validation.Formula1, 1, 1, 1)
 

но я получаю Wrong number of arguments or invalid property assignment ошибку. Количество аргументов правильное, поэтому, похоже, есть проблема с назначением Formula1?

Комментарии:

1. Formula1 доступно только для чтения, Validation.Modify должно быть полезно.

2. @BrakNicku Cells(Target.row, 6).Validation.Modify Formula1:=Application.ConvertFormula(Cells(Target.row, 6).Validation.Formula1, 1, 1, 1) возвращает Application defined or object defined error

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