Pazan  В очередь ;)  
Цитата: ті хочешь сказать, что не совпадает функциональность формул и могут біть неверніе значения?
Русское название функции может не распознаться в английском. Я не уверен как сохраняются функции в экселе. Также возможна проблема с разделителем (в английском , вместо ;).      
Добавлено:  Mushroomer  Типа такого:
Код: Function MatchRange(lookup As Range, from As Range, _ 
                     Optional first As Boolean = True) 
     Dim test As Boolean 
     If lookup.Rows.Count > 1 Or _ 
     lookup.Columns.Count <> from.Columns.Count Then 
         MatchRange = "#ERROR" 
         Exit Function 
     End If 
     For r = 1 To from.Rows.Count 
         test = True 
         For c = 1 To from.Columns.Count 
             If from(r, c) <> lookup(1, c) Then 
                 test = False 
                 Exit For 
             End If 
         Next 
         If test Then 
             MatchRange = r 
             If first Then 
                 Exit For 
             End If 
         End If 
     Next 
 End Function