Здравстуйте, помогите реализовать такой макрос: Есть файл1 и файл2. Необходимо в цикле брать поочередно значение ячейки из столбца А файла1 и искать соответствующее значение в столбце А файла2. При условии нахождения сходного значения в файле2, проверять ячейку файл2.D из найденной строки. И если текущая ячейка D не пустая, а содержит число больше нуля, то записывать в столбце M файла1 в текущей строке искомого значения символ '!', а если D файла2 ячейка пустая или меньше нуля, то символ '-'
То есть, например, примерная условная схема:
ЦИКЛ от файл1.А.[нач] до файл.1.A.[последн] //определить предварительно количество строк в столбце ЕСЛИ поиск файл1.A.x[текущ] в файл2.A = ИСТИНА //если ячейка столбца А из файла1 найдена в столбце А файла2 ЕСЛИ Файл2.D[текущ] > 0 // если найденная ячейка не пустая и больше нуля Файл1.M[текущ].записать '!' // то записать в ячейку М текущей строки файла1 записать значение '!' ИНАЧЕ Файл1.M[текущ].записать '-' //иначе записать '-' КОНЕЦ_ЦИКЛА
Задача по сути не сложная, просто я только начал вникать в VBA и нужно всё это облачить в синтаксис и процедуры языка. Буду благодарен за помощь.
Здравстуйте, помогите реализовать такой макрос: Есть файл1 и файл2. Необходимо в цикле брать поочередно значение ячейки из столбца А файла1 и искать соответствующее значение в столбце А файла2. При условии нахождения сходного значения в файле2, проверять ячейку файл2.D из найденной строки. И если текущая ячейка D не пустая, а содержит число больше нуля, то записывать в столбце M файла1 в текущей строке искомого значения символ '!', а если D файла2 ячейка пустая или меньше нуля, то символ '-'
То есть, например, примерная условная схема:
ЦИКЛ от файл1.А.[нач] до файл.1.A.[последн] //определить предварительно количество строк в столбце ЕСЛИ поиск файл1.A.x[текущ] в файл2.A = ИСТИНА //если ячейка столбца А из файла1 найдена в столбце А файла2 ЕСЛИ Файл2.D[текущ] > 0 // если найденная ячейка не пустая и больше нуля Файл1.M[текущ].записать '!' // то записать в ячейку М текущей строки файла1 записать значение '!' ИНАЧЕ Файл1.M[текущ].записать '-' //иначе записать '-' КОНЕЦ_ЦИКЛА
Задача по сути не сложная, просто я только начал вникать в VBA и нужно всё это облачить в синтаксис и процедуры языка. Буду благодарен за помощь.Zork