Столкнулся вот с какой проблемой. Не получает прописать формулу index + match + match с обращением к неактивной книге через имя "srwb". А для меня это важно, так как название открываемых книг постоянно разное.
Для начала откройте только книгу "Target". В строке 14 прописал, то, что хотел бы получить в результате... с вашей помощью и милосердием к интерну)))))
Далее нажмите "поехали" и сами все поймете.
Форумчане, помогите, пожалуйста!
Заранее большое спасибо!
С уважением, Дима
Уважаемые форумчане,
Столкнулся вот с какой проблемой. Не получает прописать формулу index + match + match с обращением к неактивной книге через имя "srwb". А для меня это важно, так как название открываемых книг постоянно разное.
Для начала откройте только книгу "Target". В строке 14 прописал, то, что хотел бы получить в результате... с вашей помощью и милосердием к интерну)))))
Sub Example() Dim MyFile As String Dim srwb As Workbook, tgwb As Workbook Set tgwb = ActiveWorkbook MyFile = Application.GetOpenFilename() Set srwb = Workbooks.Open(MyFile, True) tgwb.Activate Range("L14:O16").FormulaR1C1 = _ "=INDEX('[" & srwb.Name & "]Source'!R7C6:R10C13,MATCH(RC4,'[" & srwb.Name & "]Source'!R7C6:R10C6,0),MATCH(R13C,'[" & srwb.Name & "]Source'!R7C6:R7C13,0))" srwb.Close filesave = False End Sub
[/vba]
[vba]
Код
Sub Example() Dim MyFile As String Dim srwb As Workbook, tgwb As Workbook Set tgwb = ActiveWorkbook MyFile = Application.GetOpenFilename() Set srwb = Workbooks.Open(MyFile, True) tgwb.Activate Range("L14:O16").FormulaR1C1 = _ "=INDEX('[" & srwb.Name & "]Source'!R7C6:R10C13,MATCH(RC4,'[" & srwb.Name & "]Source'!R7C6:R10C6,0),MATCH(R13C,'[" & srwb.Name & "]Source'!R7C6:R7C13,0))" srwb.Close filesave = False End Sub
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
