Добрый вечер!
Имеется формула: =СЦЕПИТЬ("=ЕСЛИОШИБКА(ИНДЕКС(";ТЕКСТ(ДАТА(ГОД(AK1);МЕСЯЦ(AK1)-1;ДЕНЬ(AK1));"ММММ ГГГГ");"!$S:$S;ПОИСКПОЗ(J7;";ТЕКСТ(ДАТА(ГОД(AK1);МЕСЯЦ(AK1)-1;ДЕНЬ(AK1));"ММММ ГГГГ");"!$J:$J;0);0))")
Я хочу преобразовать ее в формулу следующего вида =ЕСЛИОШИБКА(ИНДЕКС(Декабрь 2016!$S:$S;ПОИСКПОЗ(J7;Декабрь 2016!$J:$J;0);0)) с помощью макроса, чтобы не делать это вручную (вставить формулу как значение, а затем в ячейке нажать мышкой и Enter).
На этапе
выдает ошибку application-defined or object-defined error.
Что не так?
Ранее я так всегда формулу "оживлял", сейчас ошибка...
Спасибо.
Имеется формула: =СЦЕПИТЬ("=ЕСЛИОШИБКА(ИНДЕКС(";ТЕКСТ(ДАТА(ГОД(AK1);МЕСЯЦ(AK1)-1;ДЕНЬ(AK1));"ММММ ГГГГ");"!$S:$S;ПОИСКПОЗ(J7;";ТЕКСТ(ДАТА(ГОД(AK1);МЕСЯЦ(AK1)-1;ДЕНЬ(AK1));"ММММ ГГГГ");"!$J:$J;0);0))")
Я хочу преобразовать ее в формулу следующего вида =ЕСЛИОШИБКА(ИНДЕКС(Декабрь 2016!$S:$S;ПОИСКПОЗ(J7;Декабрь 2016!$J:$J;0);0)) с помощью макроса, чтобы не делать это вручную (вставить формулу как значение, а затем в ячейке нажать мышкой и Enter).
Код |
---|
With Intersect(ActiveSheet.UsedRange, [AL7:AL7]) .NumberFormat = "0.00%" .HorizontalAlignment = xlCenter .FormulaLocal = .FormulaLocal End With |
Код |
---|
.FormulaLocal = .FormulaLocal |
Что не так?
Ранее я так всегда формулу "оживлял", сейчас ошибка...
Спасибо.