пытался сделать сам, но не смог.
принял решение изучить вба, но сроки для данной задачи уже поджимают.
уважаемые, прошу помочь!

нужно сравнить первые столбцы в двух листах. имя листов a1, b1. данные в столбце а1 покрашены разными цветами.
если есть совпадение значений любой ячейки столбца из листа b1 в столбце из листа a1, то в столбце b1 нужно покрасить строку в ячейке которой есть совпадение. и вынести результат совпадений в новый лист с названием c1.

в приложении пример.
заранее спасибо!

Function Translit(Txt As String) As String  
Dim Rus As Variant  
Rus = Array("а", "б", "в", "г", "д", "е", "ё", "ж", "з", "и", "й", "к", "л", "м", "н", "о", "п", "р", "с", "т", "у", "ф", "х", "ц", "ч", "ш", "щ", "ъ", "ы", "ь", "э", "ю", "я", "ев", "ер", _  
"А", "Б", "В", "Г", "Д", "Е", "Ё", "Ж", "З", "И", "Й", "К", "Л", "М", "Н", "О", "П", "Р", "С", "Т", "У", "Ф", "Х", "Ц", "Ч", "Ш", "Щ", "Ъ", "Ы", "Ь", "Э", "Ю", "Я", "ЕВ", "ЕР", _  
"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z")  
Dim Eng As Variant  
Eng = Array("A", "B", "V", "G", "D", "E", "E", "ZH", "Z", "I", "I", "K", "L", "M", "N", "O", "P", "R", "S", "T", "U", "F", "KH", "TS", "CH", "SH", "SCH", "", "Y", "", "E", "YU", "YA", "YEV", "YER", _  
"A", "B", "V", "G", "D", "E", "E", "ZH", "Z", "I", "I", "K", "L", "M", "N", "O", "P", "R", "S", "T", "U", "F", "KH", "TS", "CH", "SH", "SCH", "", "Y", "", "E", "YU", "YA", "YEV", "YER", _  
"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z")  
 
For I = 1 To Len(Txt)  
с = Mid(Txt, I, 1)  
 
flag = 0  
For J = 0 To 65  
If Rus(J) = с Then  
outchr = Eng(J)  
flag = 1  
Exit For  
End If  
Next J  
If flag Then outstr = outstr & outchr Else outstr = outstr & с  
Next I  
 
Translit = outstr  
 
End Function  
-----  
люди добрые, помогите.    
 
задачи две: 1) сделать транслит ФИО и 2) перевести ФИО в Caps Lock.    
взял вот эту функцию на вашем сайте. немного подправил ее. но не могу понять, как задать чтобы скрипт принимал по две-три буквы на входе, а не по одной... мне нужно, кроме простой транслитерации, видеть фамилию, например, Гордеев в виде GORDEYEV. то есть, чтобы "ее" трансформировалось в "EYE".  
 
спасибо заранее.