У овом чланку ћемо створити макро за проверу дуплирања и уклонити дуплиране вредности из две узастопне колоне.
Сирови подаци се састоје од детаља о циљу, који укључују назив агента, назив циљног модела и жељени назив модела.
У овом чланку желимо да избришемо оне записе који имају сличан назив циљног модела и жељени назив модела.
Објашњење кода
ЛастРов = АцтивеЦелл.СпециалЦеллс (клЦеллТипеЛастЦелл) .Ров
Горњи код се користи за добијање броја реда последње ћелије.
За и = ЛастРов до 12 корак -1
Следећи
Горња Фор петља се користи за обрнуто петље. Он ће почети да се петља од последњег реда до 12тх ред.
Ако су ћелије (и, 2) = ћелије (и, 3), тада
У горњем коду упоредили смо вредности у ћелијама 2нд колона са 3рд колона.
Редови (и) .Брисати
Горњи код се користи за брисање целог реда.
Молимо следите доле за код
Опција Екплицит Суб ДелетеМатцхес () 'Декларисање променљивих Дим ЛастРов, и Ас Лонг' Добијање броја реда последње ћелије ЛастРов = АцтивеЦелл.СпециалЦеллс (клЦеллТипеЛастЦелл) .Ров 'Петља из последњег реда у 12. ред За и = ЛастРов до 12 корак -1 Ако су ћелије (и, 2) = ћелије (и, 3), онда редови (и). Избриши крај ако је следећи крај под
Ако вам се допао овај блог, поделите га са пријатељима на Фацебооку. Такође, можете нас пратити на Твиттер -у и Фацебоок -у.
Волели бисмо да чујемо од вас, јавите нам како можемо побољшати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште