Добрый день! Давайте научимся объединять содержимое столбцов в Excel. В интернете полно статей на эту тему, но на мой взгляд, авторы пишут слишком много воды. Да и методы у них сомнительные. В общем, я решил поделиться своим способом решения проблемы...

При выгрузке из 1С, часто файлы содержат пустые столбцы (в т.ч. и скрытые), которые мешают дальнейшей обработке данных. Приходится удалять их руками, что совсем не продуктивно. Макрос решит задачу мгновенно. Копируйте код и сохраните его в Личной книге макросов. Sub ColumnDel() 'Удаляем пустые столбцы Dim i As Long Dim rgMy1 As Range Dim rgMy2 As Range Set rgMy1 = Application.Range(ActiveSheet.Range("A1"), _ ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell)) Application...