Кто нибудь может помочь переделать макрос написанный для Excel, а макрос для OpenOffice ???

Можно ли изменить расширения автоматически у всех файлов в папке, если оно другое. Например, программа выбирает только файлы .xls, но так же там содержатся файлы других форматов (например .sxc). Как переименовать все неподходящие файлы в .xls? названия файлов заранее не известны, количество тоже

В общий файл нужно свести данные из нескольких других файлов(их число заранее неизвестно).  
В имеющемся макросе, после ввода параметра получается значение, если оно удовлетворяет условию(так же введенному с клавиатуры), то данные переносятся в общий файл. Но данные добавляются, если человек ещё не добавлен в список и подходит по условию.    
 
А как сделать так что бы переносил, только тех, кто во всех файлах удовлетворяет этому условию, а не к каком то одном????  
Например, если оба получившихся параметра, у одного человека больше определенного числа, то переносим, если только в одном файле, то нет