Ранее сделали автоматическую линковку через формулу index + match + match с обращением к неактивной книге. Сейчас возникла необходимость в более элегантом решении.
Хотелось бы, что бы после отработки макроса были линки.... просто ссылка на ячеку С15 (к примеру) вместо большой формулы.
понимаю, что это возможно. Так как два мэтча в составе имеющегося решения как раз таки и находят номера столбцов и строк.
Помогите, пожалуйста, как надо изменить код, что бы линки были на какую-то отдельную строку.
Заранее большое спасибо!
С уважением, Дима
Коллеги, прошу помощи!!!
Ранее сделали автоматическую линковку через формулу index + match + match с обращением к неактивной книге. Сейчас возникла необходимость в более элегантом решении.
Хотелось бы, что бы после отработки макроса были линки.... просто ссылка на ячеку С15 (к примеру) вместо большой формулы.
понимаю, что это возможно. Так как два мэтча в составе имеющегося решения как раз таки и находят номера столбцов и строк.
Помогите, пожалуйста, как надо изменить код, что бы линки были на какую-то отдельную строку.
With Range("L14:O16") .FormulaR1C1 = "=""QQQ"" & ADDRESS(MATCH(RC4," & f & "R1C6:R10C6,0),MATCH(R13C," & f & "R7C1:R7C13,0))" .Value = .Value .Replace "QQQ", "=" & f End With End Sub
[/vba]
не сказать, чтобы уж очень элегантно, но все же: [vba]
Код
Sub Example() Dim f$, sp f = Application.GetOpenFilename() If f = "False" Then Exit Sub
With Range("L14:O16") .FormulaR1C1 = "=""QQQ"" & ADDRESS(MATCH(RC4," & f & "R1C6:R10C6,0),MATCH(R13C," & f & "R7C1:R7C13,0))" .Value = .Value .Replace "QQQ", "=" & f End With End Sub
Здравствуйте, на всякий случай раз 15 запускал код - работает без вопросов. Собственно, макрос просто пишет формулу, каким-то глюкам неоткуда взяться. Возможно, у Вас работают другие макросы (по Ontime, например)?
Кстати, стиль ссылок д.б. А1 (Параметры-Формулы-Стиль ссылок)
Здравствуйте, на всякий случай раз 15 запускал код - работает без вопросов. Собственно, макрос просто пишет формулу, каким-то глюкам неоткуда взяться. Возможно, у Вас работают другие макросы (по Ontime, например)?
Кстати, стиль ссылок д.б. А1 (Параметры-Формулы-Стиль ссылок)nilem
Яндекс.Деньги 4100159601573
Сообщение отредактировал nilem - Четверг, 12.11.2015, 18:50