Выборка и создание нового файла

[kzld]

Сообщение от SAS888

Действительно. В 2007 есть проблема. Для ее устранения, в коде макроса замените строку и будет счастье.

Ура, счастье наступило, или пришло - как правильно.
Спасибо за помощь.

Извините за настырность, но желаю следующее
Чтобы значения в столбце 2 ( или B) там, где числовые значения. приводились к виду ФОРМАТ ЯЧЕЕК-ЧИСЛОВОЙ-КОЛИЧЕСТВО ДЕСЯТИЧНЫХ ЗНАЧЕНИЙ 2-РАЗДЕЛИТЕЛЬ ГРУПП РАЗРЯДОВ
Чтобы после запятой показывал 2 знака

[SAS888]

желаю следующее...

Для этого, в коде макроса, перед строкой

[A:C].EntireColumn.AutoFit

добавьте строку

[B:B].NumberFormat = "#,##0.00"

[kzld]

Сообщение от SAS888

Для этого, в коде макроса, перед строкой

[A:C].EntireColumn.AutoFit

добавьте строку

[B:B].NumberFormat = "#,##0.00"

Счастье оказалось не полным.
Помогите подправить макрос.

Во первых, он [макрос] зачем то изменяет название первого листа.
Было "01" меняет на "Гелиос ТОО"

Второе : Во вновь созданном файле "Итог.xls" сумма по поставщику Гелиос ТОО не совпадает с суммой оригинального файла. Теряется значение ячейки лист "01" ячейка H5

[SAS888]

Возьмите во вложении файл с исправленным макросом. Причина ошибок - различия в некоторых методах Excel 2003 и 2007.

[kzld]

Сообщение от SAS888

Возьмите во вложении файл с исправленным макросом. Причина ошибок - различия в некоторых методах Excel 2003 и 2007.

Спасибо, работает.

Почему при переносе макроса в другой файл, макрос останавливается на строке
On Error GoTo 0: Workbooks("Итог.xls").Sheets(a(i, 6)).Activate

Связано ли это с тем, что имеются незаполненные ячейки
в столбцах G, H

[SAS888]

Пустых ячеек не должно быть в столбцах "L". Иначе макрос предпримет попытку создать новый лист без имени. Если нужно, можно вставить соответствующую проверку. От данных в других столбцах ничего не зависит. Прикрепите файл (фрагмент) с данными и макросом, при выполнении которого возникает ошибка. Разберемся.